![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как выполнить команду SHELL-a? [D7, WinXP]
Zahar © (2005-08-06 17:35:00)Нужно из программы на дельфи вполнить комманду:
net user гыук1 /add /passwordreq:no
Как это сделать?
Zahar (2005-08-06 22:50:00) [1]Спасибо!!!
Этот вариант сработал:
ShellExecute(Application.Handle,'open','net','user sasa /add /passwordreq:no',0,0);
Anatoly Podgoretsky (2005-08-06 21:30:00) [2]GuAV © (06.08.05 20:24) [5]
ShellExecute(Application.Handle, nil, 'net','user
asycuda /add /passwordreq:no', nil, SW_SHOW);
Adder (2005-08-06 21:25:00) [3]ShellExecute(Application.Handle,'open','net','user sasa /add /passwordreq:no',0,0);
Срабатывает. Если права есть соотвествующие.
Zahar (2005-08-06 20:42:00) [4]Пробовал... не срабатывает... просто открывает папку, где лежат исходники программы...
GuAV (2005-08-06 20:24:00) [5]ShellExecute(Application.Handle, nil, nil, 'net user
asycuda /add /passwordreq:no', nil, SW_SHOW);
Zahar (2005-08-06 20:01:00) [6]И тем не менее... как выполнить эту консольную программу?
Anatoly Podgoretsky (2005-08-06 19:51:00) [7]Вообще то это трудно отнести к шеллу, обычная консольная программа.
Zahar (2005-08-06 19:34:00) [8]Не помогает...
пробовал:
ShellExecute(Application.Handle,'open','net user asycuda /add /passwordreq:no',nil,nil,0);
Adder (2005-08-06 17:43:00) [9]http://www.delphimaster.ru/cgi-bin/forum.pl?id=1123255689&n=18