[NiOl]

Если я правильно понял: Есть некий сервер "ServerName", на нем расшарена папка "RootShare", в ней нужно создать каталог с логином текущего пользователя и дать право на чтение для всех пользователей, а самому пользователю - полные права.

Код:

@Echo Off
set SharesRoot=\\ServerName\RootShare
set AllUsers="%UserDomain%\domain users"

md "%SharesRoot%\%UserName%"2>nul
Echo Y|cacls "%SharesRoot%\%UserName%" /G "%UserDomain%\%UserName%":F %AllUsers%:R>nul

* Извиняюсь, не заметил, что вопрос по вижалБэйсику...