Как программно создать учетную запись пользователя

[awl100Alex]

Не троянописатель, пагубный целей НЕ преследую, все в строгих рамках закона! ) Возникла вот такая проблема...

Необходимо программно под правами администратора, создавать учетные записи пользователей, с прописанными паролями и другими привилегиями. К примеру, как это делают некоторые программы, типа VMware и другие.

Мне это нужно на работе. Так сложилось, что настройку закрытой локальной сети в офисе возложили на меня (а больше и некому...). И все бы ничего, но задолбался уже «хвосты заносить» за каждым, кто вдруг решил в 100 раз за неделю переустановить свою суперсистему XP. То один, то другой... А настраивать мне. Дело не хитрое, но давно уже думал, сделать это как-то просто нажатием на одну кнопку и все! Вопрос как???..

Здесь через поиск нашел подобное:
viewtopic.php?f=1&t=9673
alibek писал:
«Через ADSI элементарно. Через API жуткий геморрой. Тебе как?»

Уважаемый alibek, у меня комп немного при..@#$%$#%$..цаный не понимает он этих ADSI так же как и WMI viewtopic.php?f=1&t=37153 и здесь тоже - «Automation error»...

Нельзя ли как-нибудь по старинке – старый, добрый, «дедовский» способ API?
Давно я уже не геморроился...

[alibek]

Я бы советовал для администрирования все же использовать bat-файлы.
Для управления пользователями достаточно стандартный утилит (net user add и пр.), если недостаточно, то всегда можно поставить Resource Kit.

[Денис]

А еще можно поднять домен и хранить все учетки на нем.

[awl100Alex]

О!!.. Геморрой отменяется! Отлично!! Как говорится «ларчик» открыли топором!

http://support.microsoft.com/kb/251394

Код: Выделить всё

Private Sub Command1_Click()
RetVal = Shell("net user NewHere mypassword /Add", vbHide)
End Sub

alibek, БЛАГОДАРЮ!!!