Имя: Пароль:
1C
1С v8
Регламентное задание и папка
0 birk
 
17.02.12
13:43
Есть папка в сети. Для доступа к ней требуется логин и пароль.
Нужно получить доступ к ней из регламентного задания.
Как? :|
1 le_
 
17.02.12
13:48
Можно подключить сетевой диск. При подключении указывается логин и пароль. По завершении задания отключить.
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
2 birk
 
17.02.12
14:31
Работает :)

Спс
3 birk
 
17.02.12
14:32
Network = Новый COMОбъект("WScript.Network");
FileSystemObject = Новый COMОбъект("Scripting.FileSystemObject");

Если FileSystemObject.DriveExists("Z:") Тогда
   Network.RemoveNetworkDrive("Z:", true, true);    
Иначе
   Network.MapNetworkDrive("Z:", "\\Servstol\ExchDBF", false, "User1", "Password1");
КонецЕсли;
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.