Скрипт vbs для создания плокального пользователя с атрибутами

[Neep]

Уже столько трафика потерял, не могу найти.
почитал статью http://www.oszone.net/14239/attributes, там тоже нет этого
Подстажите, нужен скрипт на vbs , который создаст пользователя с атрибутом
Вкладка "Среда" -> "При входе в систему запускать следующую программу" и указывается программа.

Я пользователя создал, атрибуты нужные ему поставил, а этот никак не могу.

[Iska]

IADsTSUserEx::TerminalServicesInitialProgram property (Windows) (http://msdn.microsoft.com/en-us/library/dd919965(v=vs.85).aspx)

[Neep]

set objUser = GETOBJECT("WinNT://" & strComputer & "/" & "asd")
objUser.TerminalServicesInitialProgram = "cmd.exe"

Пользователь локальный на 2012 r2 сервере
вот что получаю.


Ошибка: Объект не поддерживает это свойство или метод: 'objUser.TerminalServicesInitialProgram'
Код: 800A01B6
Источник: Ошибка выполнения Microsoft VBScript

[Iska]

Установите adminpak на ту машину, с которой будет исполняться скрипт.
With GetObject("WinNT://./SomeUser,user")
.TerminalServicesInitialProgram = "cmd.exe"
.TerminalServicesWorkDirectory = "c:\"

.SetInfo
End With

[Neep]

Спасибо, установил adminpak и запустил скрипт, ошибка исчезла, пользователь создался строка запуска появилась.