【使用方法】 在VB中获取一个客户端的地址的方法,在udpWinSock_DataArrival事件中,输入下面的代码,即可获取客户端IP,发送消息给客服端。如果是客户端,需要把该IP地址转发给服务器。 Private Sub udpWinSock_DataArrival(ByVal bytesTotal As Long) Dim strData As String Dim Strs As String udpWinSock.GetData strData, vbString '接收到客户端信息 udpWinSock.RemoteHost = udpWinSock.RemoteHostIP '获取客服端的IP,并将要对话的客服端ip设置为此IP '立即发送文本给客户端 Strs = “已接收成功您的信息:" & strData udpWinSock.SendData Strs '发送回复信息给当前客户端 End Sub
您发表的跟贴