Пример Winsock

[TiG]

Заранее сори, за то что поднимаю эту избитую тему, но не смог разобраться по найденным примерам(((

Есть две машины с ip 10.0.0.73 и 10.0.0.67. Порты наверняка открыты все т.к. мы их и не закрывли в общем-то. Ну допустим по 3128 нам надо поработать.

Я се это так представляю.
dim t as string
t= test
1. Оба слушаем Winsock1.Listen
2. Кто-то нажимает коннект и происходит соединение Winsock1.Connect
3. Кто то посылает данные Winsock1.SendData t
4. Другой принимает Winsock1.GetData Text1.Text

Если я ниче не понял, то расскажите плз на пальцах как оно на самом деле работает) Мона даже маханький примерчик)

[Info_m.be_free]

И по этому не смог? http://vbstreets.ru/VB/Articles/65548.aspx ну извините...
попробуй примеры отсуда
http://www.planet-source-code.com/vb
зы: этажж байан!

[tyomitch]

Ты ничё не понял.

1. Кто-то один слушает
2. Другой нажимает коннект и происходит соединение
3. Кто-то посылает данные
4. Другой принимает их в обработчике _DataArrival