Можно подключить сетевой диск. При подключении указывается логин и пароль. По завершении задания отключить.
Set wn = WScript.CreateObject("WScript.Network")
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
if fs.DriveExists("Y:") then wn.RemoveNetworkDrive "Y:", true, true
wn.MapNetworkDrive "Y:", "\\server\share01", false, login, password
Network = Новый COMОбъект("WScript.Network");
FileSystemObject = Новый COMОбъект("Scripting.FileSystemObject");
Если FileSystemObject.DriveExists("Z:") Тогда
Network.RemoveNetworkDrive("Z:", true, true);
Иначе
Network.MapNetworkDrive("Z:", "\\Servstol\ExchDBF", false, "User1", "Password1");
КонецЕсли;
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.