TCPConnect
Создаёт сокет, подключенный к существующему серверу.
TCPConnect ( IPAddr, port )
Параметры
IPAddr | IP-адрес, например "192.162.1.1" (десятично-точечное представление, IpV4). |
port |
Порт, к которому созданный сокет будет подключен. |
Возвращаемое значение
Успех: | Возвращает основной идентификатор сокета. |
Ошибка: | Возвращает -1 или 0 и устанавливает @error. |
@error: | 1 Неверный IP-адрес. |
2 Неверный порт. | |
Возвращает значения windows API WSAGetError (смотрите MSDN). |
Примечания
Эта функция используется клиентом для связи с сервером.См. также
TCPStartup, TCPListen, TCPTimeout (Опция), TCPRecv, TCPSendПример
; Этот скрипт - клиент, запускайте его после сервера! (Запускайте сначала пример функции TCPAccept).
Example()
Func Example()
TCPStartup() ; Запуск TCP служб.
; Регистрация функции OnAutoItExit для остановки служб при завершении скрипта.
OnAutoItExitRegister("OnAutoItExit")
; Установка IP-адреса и порта
Local $sIPAddress = "127.0.0.1" ; Этот IP-адрес работает только для теста на вашем компьютере.
Local $iPort = 65432 ; Порт, используемый для соединения.
; Подключает прослушивание сокета, указанного IP-адреса и порта.
Local $iSocket = TCPConnect($sIPAddress, $iPort)
If @error Then ; Если ошибка, то выход
; Сервер, вероятно, в офлайне, или порт не открыт на сервере.
MsgBox(4096 + 16, "Клиент", "Не удалось подключиться, @error = " & @error)
Return False
Else
MsgBox(4096, "Клиент", "Успешное подключение")
EndIf
TCPCloseSocket($iSocket) ; Закрывает сокет
EndFunc ;==>Example
Func OnAutoItExit()
TCPShutdown() ; Останавливает TCP службу.
EndFunc ;==>OnAutoItExit