Есть сервер 2003 на нем выполнякется скрипт при логоне пользователя в систему.

Как это скрипт выполнить с правами админа. Скрипт создает ярлык на столе у пользователя. Если у пользователя права локального админа - ярлык создается, а если прова пользователя, то выдается ошибка о сохраннении ярлыка на рабочем столе.


Option Explicit

Dim oShell, oShortCut, sDeskTopPath

Set oShell = CreateObject("Wscript.Shell")

sDeskTopPath = oShell.SpecialFolders("AllUsersDesktop")

Set oShortCut = oShell.CreateShortcut(sDeskTopPath & "\consultant_lite.lnk")

oShortCut.Hotkey = "CTRL+SHIFT+C"

oShortCut.TargetPath = "\\SRVDC1\Consultant_lite\cons.exe"

oShortCut.Save