Простой пример с Winsock

[neic]

Как мне передать с одного IP текстовую информацию на другой IP.
Т.е. Как серверу послать из клиента сообщение?

Большая просьба сделать исходником

[zHackLeX]

На, лови пример... на винсоке....

надеюсь, то что надо...

[neic]

Обнуляю удалённый порт сервера и локальный порт клиента, дальше на сервере жму Listen, а на клиенте Connect.
На сервере кнопка вообще не разблокируется, на клиенте разблокируется, нажимаю на клиенте Send (есен перец с текстом в поле Text5) и ошибка : 40006 и клиент закрывется

[neic]

ОК! Разобрался как обычно, сам! Вот только вопрос:

в Winsock1.RemoteHost = "127.0.0.1" можно писать не IP, а имя сервера или хоста?
Или как сделать так чтобы клиент подключался напрямую к северу(чтобы не надо ничего было вводить, а сразуже при загрузке программы подключался)

[tyomitch]

в Winsock1.RemoteHost = "127.0.0.1" можно писать не IP, а имя сервера или хоста?

Можно.

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

Прописать подключение в Form_Load?

[XPAHuTEJIb]

я делаю приблизительно так:

в form_load

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

ws1.connect "127.0.0.1","4321"
timer1.enabled=true

в timer1

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

if ws1.state<>7 then
ws1.close
ws1.connect "127.0.0.1","4321"
end if

таймер это тайм-аут ответа

[alibek]

XPAHuTEJIb, как думаешь, зачем у сокета есть события?

[Matew]

neic, самые простые примеры здесь: http://www.vbrussian.com/Article.asp?ID=68

[XPAHuTEJIb]

alibek
Ты имеешь ввиду ws1_connect() (к примеру)?
Да, там надо таймер выключить за ненадобностью, хотя можно и оставить, вдруг слетит коннект.

А если он не приконектится сразу, сервер будет недоступен, надо будет сидеть и тыкать кнопочку connect...а так поставил таймер на сколько надо и всё..

[neic]

tyomitch
Например:
Winsock1.RemoteHost = "host"

можно так?

[tyomitch]

Можно. Разрешаю.

[neic]

tyomitch
ОК. Огромное спасибо всем!