Как выполнить команду SHELL-a?

← →
Zahar (2005-08-06 17:35) [0]

Нужно из программы на дельфи вполнить комманду:

net user гыук1 /add /passwordreq:no

Как это сделать?

← →
Adder © (2005-08-06 17:43) [1]

http://delphimaster.net/view/2-1123255689/

← →
Zahar (2005-08-06 19:34) [2]

Не помогает...

пробовал:
ShellExecute(Application.Handle,"open","net user asycuda /add /passwordreq:no",nil,nil,0);

← →
Anatoly Podgoretsky © (2005-08-06 19:51) [3]

Вообще то это трудно отнести к шеллу, обычная консольная программа.

← →
Zahar (2005-08-06 20:01) [4]

И тем не менее... как выполнить эту консольную программу?

← →
GuAV © (2005-08-06 20:24) [5]

ShellExecute(Application.Handle, nil, nil, "net user
asycuda /add /passwordreq:no", nil, SW_SHOW);

← →
Zahar (2005-08-06 20:42) [6]

Пробовал... не срабатывает... просто открывает папку, где лежат исходники программы...

ShellExecute(Application.Handle,"open","net","user sasa /add /passwordreq:no",0,0);
Срабатывает. Если права есть соотвествующие.

GuAV © (06.08.05 20:24) [5]
ShellExecute(Application.Handle, nil, "net", "user
asycuda /add /passwordreq:no", nil, SW_SHOW);

← →
Zahar (2005-08-06 22:50) [9]

Спасибо!!!

Этот вариант сработал:
ShellExecute(Application.Handle,"open","net","user sasa /add /passwordreq:no",0,0);