|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
29.09.2007, 17:40 | #1 |
Форумчанин Подтвердите свой е-майл
Регистрация: 07.07.2007
Сообщений: 241
|
cmd.exe
нужно программно, скрытно от пользователя открыть cmd.exe, вписать строку, нажать ввод и закрыть cmd
|
29.09.2007, 17:51 | #2 |
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,051
|
а что вводить то нужно ?
|
29.09.2007, 18:32 | #3 |
Форумчанин Подтвердите свой е-майл
Регистрация: 07.07.2007
Сообщений: 241
|
Cacls D:\123 /D User <\tmp
|
29.09.2007, 21:21 | #4 |
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,051
|
http://www.programmersforum.ru/showthread.php?t=1091
тебе нужно что то похожее на ShellExecute(Handle, nil, 'cmd.exe', '/c '+{Путь к твоей проге}, nil, SW_SHOW); |
29.09.2007, 22:34 | #5 |
Форумчанин Подтвердите свой е-майл
Регистрация: 07.07.2007
Сообщений: 241
|
Работает, только там спрашивается ответить y/n т.е. "продолжить ?" как вписать в следующую строчку "y" ?
|
29.09.2007, 22:57 | #6 |
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,051
|
допиши в конце эти ключи /s /q
|
30.09.2007, 09:58 | #7 |
Форумчанин Подтвердите свой е-майл
Регистрация: 07.07.2007
Сообщений: 241
|
|
30.09.2007, 11:06 | #8 |
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,051
|
что выдает ?
покажи код .... |
30.09.2007, 12:57 | #9 |
Форумчанин Подтвердите свой е-майл
Регистрация: 07.07.2007
Сообщений: 241
|
Так неработает:
ShellExecute(Handle, nil, 'cmd.exe', '/c '+'Cacls D:\123 /D User /s /q', nil, SW_SHOW); Так работает, только нужно нажать Y: ShellExecute(Handle, nil, 'cmd.exe', '/c '+'Cacls D:\123 /D User', nil, SW_SHOW); |
30.09.2007, 14:09 | #10 |
Участник клуба
Регистрация: 01.11.2006
Сообщений: 1,051
|
Даже не знаю почему оно не работает. Я вот писал скрытую очистку дискеты
ShellExecute(Handle, nil, 'cmd.exe', '/c '+'RD a: /S /Q', nil, SW_HIDE); никаких проблем небыло !!! |