» Задачи на bat-файлах 8

Nagual
а он под винду?

wolf0425

В очередной раз большое спасибо

Цитата:

wolf0425
В очередной раз большое спасибо

От меня тоже огромное человеческое спасибо!
По больше бы таких спецов!
Респект...

С уважением...

Еще вопрос такой - нужно примапить диск и сразу что бы название прописано было для него.


Код: net use z: \\comp_name\share_folder /PERSISTENT:YES

Mark_Titov
Первый вопрос вообще не понял.

А на счет второго - не проблема.
В конце своего батника допиши
Код: echo CONNECT TO SERVER: >>\\pc\sharename\mybatch.log
echo ------------------------------------- >>\\pc\sharename\mybatch.log
echo User name: %username% >>\\pc\sharename\mybatch.log
echo Computer_name: %computername% >>\\pc\sharename\mybatch.log
echo Date: %date% >>\\pc\sharename\mybatch.log
echo Time: %time:~0,-3% >>\\pc\sharename\mybatch.log
echo ------------------------------------ >>\\pc\sharename\mybatch.log

Цитата:

А на счет второго - не проблема.
В конце своего батника допиши

Да, это то что надо, спасибо!


Цитата:

Первый вопрос вообще не понял.

Там нужно что бы в примапленном диске командой батника сразу ему имя СВОЕ можно было задать в место того которое он сам пишет - "share on terminal_1 (Z:)"

Заранее благодарю...

а зачем вообще мапить? прямых url для работы батника - недостаточно?

Цитата:

а зачем вообще мапить? прямых url для работы батника - недостаточно?

Для меня достаточно, а для "Блондинок" которым я это делаю - нет... ))
Возможно такое или нет?

Mark_Titov
Вот переименовалка
netdsk01 заменишь на то, что тебе больше нравиццо.

Код: net use z: \\comp_name\share_folder /PERSISTENT:YES
label z: netdsk01

Цитата:

Вот переименовалка
netdsk01 заменишь на то, что тебе больше нравиццо.

Спасибо за ответ...
Чего-то ерунда какая-то творится, когда добавляю эту строку пишет "Доступ запрещен",
а диск мапит со своим названием как обычно... ((
Получается нет прав на переименование диска что ли?!
Прикольно, на нем я админ и у себя тоже админ, в чем прикол?

Сдаётся мне что он пытается сменить название на удалённой машине...
Work in progress...

Уже работает. Надо было просто подождать. Косяг?
Метод работает у мну на машине. Только надо минут 10 подождать.

Цитата:

Сдаётся мне что он пытается сменить название на удалённой машине...
Work in progress...

Так если даже и на удаленной - я там админ...
Так как же тогда переименовывать на своей машине?

us0r

Цитата:

set /p str=<file.txt
1>file.txt echo.%str: =-%
1 в данном случае- это поток вывода?

да, stdout. и перенаправление стоит перед командой чтобы в файл не добавлялся лишний пробел.

Цитата:

И почему echo идёт сразу с точкой, а не используеццо пробел?

а вдруг строка будет пустая? "is off" в файле наверно же ни к чему.

Mark_Titov
Батнег_Ренамер_concept_v1.0 WindowsXP ONLY!

Код: @echo off
cls
net use z: /delete /y
net use \\comp_name\share_folder /delete /y
net use z: \\comp_name\share_folder
net use z: /delete /y
reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##comp_name#share_folder /f /v _LabelFromReg
reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##comp_name#share_folder /v _LabelFromReg /d Us0r,ThX!
net use z: \\comp_name\share_folder /PERSISTENT:YES
pause > nul

Цитата:

Thanks for us0r :D (just for lulz)

- ))))))
us0r - Спасибо большое! Выручил, работает!...

Вопрос по скриптам можно?

Есть vbs скриптик хороший, рабочий -


Код: Dim w
Set W = CreateObject("Word.Application")
w.Visible = false
w.Documents.Open "C:\Temp\test.txt"
w.ActiveDocument.PrintOut
WScript.Sleep(1000)
w.Quit
Set w = Nothing

Теоретически это можно...

Цитата:

Теоретически это можно...

...А просто батником можно найти нужный файл на удаленном компе и отправить его на принтер своего компа?

Да. Пути к файлу известны?

Цитата:

Скрипт лежит на сервере, нужно с моего компа его запустить обязательно батником и что бы он распечатал указанный в нем файл (распечатываемый файл будет тоже на том же серваке) НА МОЕМ ПРИНТЕРЕ...
Это возможно?

а какие видятся проблемы то? тем же vbs и напечатай, только вместо "C:\Temp\test.txt" вписываешь "\\server_name\C$\Temp\test.txt" - ну если вход на с$ доступен с твоего логина.

Цитата:

Да. Пути к файлу известны?

Да -
\\terminal_1\c$\windows\ime\shared\pal.txt

Добавлено:

Цитата:

а какие видятся проблемы то? тем же vbs и напечатай, только вместо "C:\Temp\test.txt" вписываешь "\\server_name\C$\Temp\test.txt" - ну если вход на с$ доступен с твоего логина.

...так и делал, но доступа пишет нет. Бред какой-то, я там админ - сам ставил его и захожу как хочу туда - везде пускает...
Может для скрипта какие-то особые параметры или разрешения нужны?!

Цитата:

...так и делал, но доступа пишет нет.

ну. а если в эксплорере ввести в поле пути \\terminal_1\c$\ - доступ к папке есть?
или в нотепаде открыть \\terminal_1\c$\windows\ime\shared\pal.txt

кстати, распечатать через нотепад тоже можно

notepad /p "\\terminal_1\c$\windows\ime\shared\pal.txt"


Цитата:

Может для скрипта какие-то особые параметры или разрешения нужны?!

врядли. скорее у тебя проблемы с правами в сети какие-то.

Цитата:

ну. а если в эксплорере ввести в поле пути \\terminal_1\c$\ - доступ к папке есть?

...Конечно есть.


Цитата:

или в нотепаде открыть \\terminal_1\c$\windows\ime\shared\pal.txt

...да, пока так и сделал

Добавлено:
Но не устраивает что блокнот маячит, хотя потом и закрывается.
Нельзя как-нибудь что бы он вообще не появлялся?

Код: NOTEPAD /P %name% \\terminal_1\C$\WINDOWS\ime\shared\pal.txt

Mark_Titov
Отдельным скриптом:

Код: Set oCtrl = CreateObject("WshController")
Set oScript = oCtrl.CreateScript("path_string\scriptname.vbs", "computername")
WScript.ConnectObject oScript, "RemoteFuncAliasName"
oScript.Execute()
IsQuit = False
While Not IsQuit
Wscript.Sleep 100
Wend
Function RemoteFuncAliasNameEnd()
Wscript.Echo "Усио. Отпахал)))"
IsQuit = True
End Function
Function RemoteFuncAliasNameError()
Wscript.Echo oScript.Error.Description
IsQuit = True
End Function
Function RemoteFuncAliasNameStart()
Wscript.Echo "Понеслась!"
End Function

Цитата:

Можешь запихнуть сие и в батнег, ток геммора побольше.

Спасибо, а гемора на самом деле больше будет... ))

us0r

Цитата:

Important Information

Не знаю как нынче, а раньше хорошим тоном было указывать ссылку на источник.
http://www.script-coding.info/Remote.html

Цитата:

знаю как нынче, а раньше хорошим тоном было указывать ссылку на источник.

...Тут не все так просто. Запустить его на удаленке это пол дела, его нужно во-первых командой с батника (который находится на моем компе) запустить на удаленном сервере, так как сам скрипт там будет лежать, а во-вторых что бы он еще нашел мой принтер для распечатки файла...


Код: Dim w
Set W = CreateObject("Word.Application")
w.Visible = false
w.Documents.Open "C:\Temp\test.txt"
w.ActiveDocument.PrintOut
WScript.Sleep(1000)
w.Quit
Set w = Nothing

Есть .ini файл примерно такой структуры:

Код: [start]
val=123
abc=456
qwerty=fgh
[moore]
zxc=poi

METAJIJI

Цитата:

Может кто подскажет как ускорить процесс?

Использовать sed или его аналоги (работающие с регулярными выражениями).

Цитата:

считываю значения опций, запоминаю в переменные

это можно значительно проще делать... Если, конечно, я правильно понял структуру Вашего ini...

Код: for /f "eol=[ delims=" %%A in (my.ini) do SET "%%A"

После чтения значений в переменной %val% находится значение 123, оно меняется в процессе работы BAT, потом мне нужно сохранить измененные зачения! вот отсюда и непонятные танцы с SET и пр.
проще говоря я хочу сделать редактор ini файла, средствами bat. в результате которого будут меняться значения и после обработки ini файл примет вид:

Код: [start]
val=789
abc=941
qwerty=fgh
[moore]
zxc=sdf