Имя пользователя:
Пароль:
 

Название темы: [решено] CMD: net user /add
Показать сообщение отдельно

Аватара для dimich22

В работе


Сообщения: 851
Благодарности: 216

Профиль | Сайт | Отправить PM | Цитировать


voler, если вместо "." использовать имя компьютера напрямую, то все работает.

Попробуй тогда вместо первой строки
Код: Выделить весь код
Set objNetwork = CreateObject("WScript.Network") 
strComputer = objNetwork.ComputerName 

Set objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\" & _ 
strComputer & "\root\cimv2:Win32_ComputerSystem.Name='" & _ 
strComputer & "'")

-------
Программа выполняет то, что вы ей приказали делать, а не то, что бы вы хотели, чтобы она делала.
Компьютерная литература Мой сайт Active Directory Сборник рецептов


Отправлено: 14:26, 28-11-2007 | #9

Название темы: [решено] CMD: net user /add