Результат от процесса

← →
Dr.Karter © (2004-03-22 15:54) [0]

Хотелось бы получать такую информацию в файл:

с помощью коммандной строки так:
ping 192.168.0.1 > C:\1.txt

с помощь программы:
uses ... WinAPI;
.
.
.
ShellExecute(0,"open","ping",pchar("192.168.0.1"),nil,nil,SW_ShowNormal);

Пытался делать так: ShellExecute(0,"open","ping",pchar(IPAddress+" > C:\1.txt"),nil,nil,SW_ShowNormal);

НЕ РАБОТАЕТ!!!!!!!
Что делать? Точно также с ipconfig

СПАСИБО

← →
Kerk © (2004-03-22 16:07) [1]

на вскидку:

command.com /c ping 111.111.111.111 >c:\123.txt
start ping 111.111.111.111 >c:\123.txt

← →
BillyJeans © (2004-03-22 16:38) [2]

через Pipes попробуй...

← →
Dr.Karter © (2004-03-23 06:01) [3]

получилось с помощью:
WinExec(pchar("command.com /c ping 192.168.0.120 > C:\123.txt"),1);
При 1 - я вижу командную строку пустую и жду до исчезновения(время пингалки)
При 0 ничего не вижу, но файл не могу прочитать пока это время не пройдет.
А через ShellExecute можно ли это сделать?

← →
Kerk © (2004-03-23 15:00) [4]

Можно через CreateProcess перенаправить консольный вывод на pipe.

← →
Dr.Karter © (2004-03-24 10:52) [5]

Как код подскажите пожалуйста в примере или критерий поиска в helpe

← →
Dr.Karter © (2004-03-24 10:56) [6]

Нашел такую штуку она?
procedure CreateProcess(const ExeName, Args: string; const RemoteHost: string = "");

И как тут с типом ping, ipconfig и т.д

И встречный вопрос. Все что угодно могу в файл запихнуть?

> Нашел такую штуку она?
> procedure CreateProcess(const ExeName, Args: string; const
> RemoteHost: string = "");

Нет, не она... :)
Ищи CreateProcess в http://msdn.microsoft.com/library

ShellExecute(0,"",ping.exe",pchar(IPAddress+" > C:\1.txt"),"",sw_showNormal);

http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=1057316445&n=15

Результат от процесса Найти похожие ветки