[решено] Создать локального пользователя

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)

- - [решено] Создать локального пользователя (http://forum.oszone.net/showthread.php?t=266951)

Создать локального пользователя

Здравствуйте, пытаюсь создать локального пользователя в Windows7 с помощью командной строки, для этого запускаю cmd с правами администратора но в командной строке все равно выдает ошибку мол недостаточно прав.
Подскажите что не так делаю.

Код:

#include <GUIConstants.au3>



GUICreate("", 170,200)

Global $create = GUICtrlCreateButton("Создать пользователя", 10,10,150,30)



func CreateUser()

        RunAs("Adm","","123",0,"cmd.exe /c net user пользователь1 /add")

EndFunc



GUISetState(@SW_SHOW)

while 1

   Switch GUIGetMsg()

        Case $GUI_EVENT_CLOSE

                 Exit

        Case $create

                CreateUser()

   EndSwitch

WEnd

Код:

#RequireAdmin

#NoTrayIcon



AutoItSetOption("MustDeclareVars", 1)



Local $sComputer = "."

Local $oIADsContainer = ObjGet("WinNT://" & $sComputer & ",computer")

Local $oIADsUser = $oIADsContainer.Create("user", "UserName")



$oIADsUser.SetPassword("His Password")

$oIADsUser.SetInfo

Спасибо)
Я просто думал через командную строку проще, но и с помощью ObjGet создается без проблем.
А как теперь создать группу и добавить этого пользователь в нее.
И как задать пароль другому пользователю (админу)

Иле подскажите где можно почитать подробнее про ObjGet, а именно по работе мс пользователями?

sawas, читать на MSDN: Active Directory Service Interfaces Reference (Windows) (обращайте внимание на используемого провайдера; здесь был использован «WinNT:»). Примеры — там же, переделка их с VBScript на AutoIt не представляет какого-то особого труда. Само собой — репозиторий скриптов: Powershell, VB Script, SQL and JavaScript - TechNet IT Pro's and Scripting Guys; например, конкретно Ваш вопрос здесь: Script Create a User Account and Add the User to the Local Administrators Group. После преобразований получается примерно следующее:

Код:

#RequireAdmin

#NoTrayIcon



AutoItSetOption("MustDeclareVars", 1)



Local $sComputer = @ComputerName

Local $oIADsContainer = ObjGet("WinNT://" & $sComputer & ",computer")

Local $oIADsUser = $oIADsContainer.Create("user", "UserName")



$oIADsUser.SetPassword("His Password")

$oIADsUser.SetInfo



Local $oIADsGroup = $oIADsContainer.Create("group", "GroupName")

$oIADsGroup.SetInfo

$oIADsGroup.Add($oIADsUser.ADsPath)