[babki]

Сделал так свой файл - пишется ошибка "Требуется объект oShell.NameSpace("...")"
sDrive="s:\"
Set oShell = CreateObject("shell.Application")
oShell.NameSpace(sDrive).Self.name = "obmen"


- пишется ошибка "Требуется объект oShell.NameSpace("...")"
пробовал переписать еого так

sDrive="s:\"
Set oShell = CreateObject("shell.Application")
oShell.NameSpace(sDrive).Self.name = "\\server\obmen"

Та же самая ошибка