一个很菜的问题,如何用Winsock控件的UDP协议编程!
pasu 2000-07-20 02:24:00 我的程序
服务器端
Private Sub Command1_Click()
Winsock1.LocalPort = 1234
Winsock1.Protocol = sckUDPProtocol
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
winscok1.getdata a
End Sub
客户端
Private Sub Command1_Click()
Winsock1.RemoteHostIP = "123.123.123.123"
Winsock1.RemotePort = 1234
Winsock1.Protocol = sckUDPProtocol
Winsock1.SendData "abc"
End Sub
我是在同一部机上开两个VB来做的。
但就是连不上。