Вывод запушенных процессов.

← →
Renegate (2003-05-16 09:07) [0]

Здраствуйте! У меня проблема. Как вывести запушенные процессы сетевого компьютера на мой компьютер, используя ClientSocket & ServerSocket? Подскажите пожайлуста, на примере......

← →
Digitman (2003-05-16 09:23) [1]

дели вопрос свой пополам :

1. Получение списка активных процессов в Win9x/Me

2. Организация соединения между компьютерами и транспорта данных между ними с использованием компонентов TClientSocket и TServerSocket.

Это две совершенно независимые задачи, каждая из которых требует отдельного (и не самого простого) решения.

1-й вопрос - в форум "Система" и/или "WinAPI"
2-й вопрос - в этот форум

← →
Renegate (2003-05-16 10:26) [2]

Ну может ты мне по этим двум вопросам и подскажешь как это всё проделать?!

← →
Digitman (2003-05-16 10:56) [3]

> Renegate

по 1-му вопросу - изволь все же задать его в указанных форумах. Не нарушай правила.

Здесь будет идти речь только по 2-му вопросу.

Тебе придется разработать 2 приложения : приложение-сервер (ServerApp) и приложение-клиент (ClientApp).

ServerApp: (стартует первым по времени на интересующей машине с установленным с TCP-протоколом в сети)

на форме размести компонент TServerSocket,
в обработчике события формы OnCreate() размести строки
ServerSocket.Port := номер_любого_свободного_порта;
ServerSocket.Active := True;

в обработчике события ServerSocket.OnClientRead() методом Socket.ReceiveBuf() будешь считывать данные, пришедшие от клиента, содержащие различные запросы клиента к серверу, например, запрос списка работающих на машине-сервере процессов. Здесь же можно будет ответить клиенту на запрос вызовом метода SendBuf()

ClientApp: (по времени стартует позже ServerApp, стартует на "твоей" машине с установленным с TCP-протоколом)

на форме размести компонент TClientSocket
установи
ClientSocket.Port := тот_же_номер_порта_что_был_установлен_в_ServerApp
ClientSocket.Address := IP_адрес_машины_с_ServerApp
ClientSocket.Open;
while not ClientSocket.Active do
Application.ProcessMessages;

после успешного выполнения этих строчек в нужный момент времени посылай серверу запросы (по разработанному тобой спец.протоколу) , используя метод ClientSocket.Socket.SendBuf()

прием от сервера ответов на посланные запросы ожидай и осуществляй в событии ClientSocket.OnRead() с использованием метода Socket.ReceiveBuf()

Вывод запушенных процессов. Найти похожие ветки