读书人

请高手帮忙,winsock有关问题

发布时间: 2012-01-08 22:48:50 作者: rapoo

请高手帮忙,winsock问题
如果我通过一台电脑发送数据过来,可以接收到发送的数据;可是我发送数据到网络中的一个设备,怎么就不能接收到它的返回数据呢,我用抓包工具,可以看到该网络中的设备也向计算机发送信息了,可是总是收不到,是什么原因阿??
代码是这样的: [code=VB][/code]
SockRec.LocalPort = CInt(txtLocalPort.Text)
SockRec.Bind CInt(txtLocalPort.Text)
Private Sub SockRec_DataArrival(ByVal bytesTotal As Long)
Dim data As String

data = String(bytesTotal + 2, Chr$(0))
SockRec.GetData data, , bytesTotal
RecMessage.Text = data
lblRemoteIPAddr.Caption = SockRec.RemoteHostIP
lblRemotePort.Caption = SockRec.RemotePort

End Sub

[解决办法]
用 socket控件吗 有现成的事件函数

读书人网 >VB

热点推荐