Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Butunin Klim

Ветеран


Сообщения: 1482
Благодарности: 117

Профиль | Отправить PM | Цитировать


net use k: /delete /yes

net use k: \\server\obmen

call \\server\папка\start_department.vbs


Это другой фаил для департамента
=-----------------start_department.vbs---------------

sDrive="K:\"
Set oShell = CreateObject("shell.Application")
oShell.NameSpace(sDrive).Self.name = "OBMEN"



--------
На папку и на скрипты установи разрешение читать и выполнять

-------
Сообщение помогло? В знак благодарности НАЖМИТЕ ПОЛЕЗНОЕ СООБЩЕНИЕ

Мы зрим не то, что есть вокруг,
А то, что можем видеть зримо.
А то, что зреть не достижимо
Нам не узреть во век веков.

Мой веб-магазин товары Amway http://butunina.ru


Отправлено: 16:31, 18-08-2006 | #12