在打开的套接字(socket)上面发送数据
UDPSend ( 套接字数组, 数据)
| 套接字数组 | 由 UDPOpen 函数返回的主套接字/数组. |
| 数据 | 套接字连接发送的二进制数据/字符串 |
| 成功: | 返回套接字发送的字节数. |
| 失败: | 设置 @error. |
| @error: | -1, -2 或 -3 套接字数组无效. |
| 1 IP地址错误. | |
| 2 端口错误. | |
| 或 windows API WSAGetError 的返回值 (请查阅 MSDN). |
;;这是 UDP 客户端
;;首先启动服务器
; 启动 UDP 服务器
;==============================================
UDPStartup()
; 注册清除函数.
OnAutoItExitRegister("Cleanup")
; 打开套接字 "SOCKET"
;==============================================
Local $socket
= UDPOpen("127.0.0.1", 65532)
If @error
<> 0
Then Exit
Local $n
= 0
While 1
Sleep(2000)
$n
= $n + 1
Local
$status =
UDPSend($socket, "Message #" & $n)
If
$status =
0 Then
MsgBox(0, "错误", "发送 UDP
消息时出错: " & @error)
Exit
EndIf
WEnd
Func Cleanup()
UDPCloseSocket($socket)
UDPShutdown()
EndFunc ;==>Cleanup
| provider with jb51.net (unicode) |