Вниз
Скачать: CL | DM;

Как выполнить команду 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]

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


 
Adder ©   (2005-08-06 21:25) [7]

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


 
Anatoly Podgoretsky ©   (2005-08-06 21:30) [8]

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);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
14-1126006920
Ylia___
2005-09-06 15:42
2005.10.02
Симуляция нажатия клавиш в играх


14-1126592667
Ega23
2005-09-13 10:24
2005.10.02
Лекция Никлауса Вирта


3-1124353655
M@rlin
2005-08-18 12:27
2005.10.02
RvDataSetConnection


2-1124562995
Пантелеев Иван
2005-08-20 22:36
2005.10.02
RadioGroup


14-1126280571
Джо
2005-09-09 19:42
2005.10.02
Забава от MS Word. Съешьте еще этих булок.




   Наверх