Клиент-Серверная система

[kitit]

Есть Серверное приложени (обычная экзешка без БД), кот отслеживает состояние ПО (зависшее или нет) на сервере.

На каждом компе установлена Клиентская часть.

Как Серверным приложением по сети, зная IP клиентских машин, оповестить клиенсткие части что зависла ПРОГА1, а Клиетские машины в свою очередь выдадут сообщение своим юзерам...?

Заранее всем ОГРОМНОЕ спасибо!

[student-uni]

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

[Ramzes]

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

Можно, но гараздо проще и удобние делать CallBack

[kitit]

Можно, но гараздо проще и удобние делать CallBack [/quote]

Как это сложно делать?

Можно с кодом по-подробнее?

[Ramzes]

Можно хоть всю программу напсать, только за деньги
код писать лениво, тем более сложно там ничего, а вот подробни, это всегда пожалуйста
Есть у тебя удаленный объект (который будут юзать клиенты) наследуеться он от MarhalByRef (это понятно я надеюсь) (назовем его RemO).

Создаешь в тоей-же сборке интерфейс (назовем его например IEvents) и в нем столько методов, сколько событий тебе нуна

Далее в удаленном объекте (RemO) создаем приватный член типа IEvents

Код: Выделить всё

Dim m_events as IEvents

далее в RemO пишем какой нить метод регистрации этого самого обьекта (можно например и в конструкторе)

Код: Выделить всё


private sub RegisterCallBack(events as IEvents)
m_events = events
end sub


на этом работа с удаленным обьктом закончена

теперь клиент, создаем там некий класс который наследуеться от MarsharByRefObj и реализовует интерфейс IEvents

создаем его обьект в нужном месте, и знаем, что вместо собыйтий будут выполняться методы нашего объекта.