|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
taskLiat путями Delphi!
Люди собсна вопрос в следующим
есть програмка сканирует сетку берет айпи с тхт документа 192.168.15.1 ............. 192.168.15.254 и пингует их ответившие айпи записовает в мемо чтоб было видно кто ответил! вот! теперь собсна проблема есть ли в делфи кампанента чтоб просматреть список задач запущеных на удаленной машине как например в cmd tasklist /s 192.168.15.1 вот как осушествить просмотри списка запцшеных задач на удаленной машине! просто в cmd писать каждый айпи Долго если их 254 айпишника вот чтоб записовал или выводил список задач по каждой машине в мемо или куда угодно!! |
#2
|
||||
|
||||
Ну можно сделать это через известные вам комманды.
Запускать для каждого из IP в списке, cmd с IP как параметром, результат работы выводить в файл. Затем читать содержимое этого файла в ваш memo. Если по скорости не критично, то вполне работоспособный вариант. Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#3
|
|||
|
|||
да согласин модно зделать чтоб cmd там вставлять параметр
tasklist /s ip >FILE.TXT А потмо уже этот файл подргужать в мемо! а если там 100 адресов это каждый ждать пока пасмотрит пока сохранит пока подргузит мнеб чтоб оно само брала по порядку ответивший ип сматрела и схраняла в блокнот чтоли неважно и получалось что то в виде Ip машины запущенные процессы 192.168.15.2 sfrwesgf.exe dsfwefwefw.exe ............................. 192.168.15.254 fdgerger.exe dfsdfsdfs.exe и т д чтоб видно было ип и запушеные процессы потом обрабатовать проще |
#4
|
||||
|
||||
Ничего подобного.
Во первых работать это будет достаточно быстро Во вторых, каждый запуск ShellExecute идет в отдельном процессе, так-что можете запускать сразу все. Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#5
|
||||
|
||||
Ну и конечно выходной файл который вы формируете при каждом запуске должен быть уникальным.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#6
|
|||
|
|||
да вприцнепи зделал
ShellExecute(handle,'open','cmd.exe','/K TAsklist >> c:\logs.txt','',0); а дает тока локальные задачи запущеные нада ип подставить вот как напсиать а??? A:=Listbox1.Items[ListBox1.ItemIndex] вот переменую эту там айпи |