winsock控件连接故障求教

[snakeegg]

大家好,我是一名VB初学者,第一次来这里,请多指教

我想编一个局域网对战的中国象棋,先用一个winsock控件以tcp协议进行连接并获得成功.我想用另外一个winsock控件以udp协议进行在线聊天,借用的就是之前已经成功的remotehost(没有进行新的连接),可是极不稳定,动不动就出现runtime error 126,不知为什么,还是我第二个sock必须要重新连接才行,还望各位朋友多多指教,谢谢!!!!

[luoming]

我还是不明白你所说的你好像没说清楚说清楚点我好帮你

[snakeegg]

谢谢你啊,明哥
就是说我第一个winsock用TCP/IP协议已经把服务器和客户端连接成功了.这时候我还有另一个winsock,用的是UDP,初始化时用的如下代码(ccSocket是第一个已经成功的winsock,chatSocket是第二个)
chatSocket.LocalPort = 11024
chatSocket.RemoteHost = ccSocket.RemoteHostIP
chatSocket.RemotePort = 11024
然后连接就有毛病,我不知道上面这样设置是否可以,哎,烦死了,一会通一会不通的

[pp616]

看来你不会用udp协议啊。

[snakeegg]

是的,有很多不懂的地方,讲讲好吗,谢谢!!!!

[snakeegg]

很急的,帮帮我好吗,多谢了!!!!!!!!!!!

[snakeegg]

都一天了,为什么还没人帮我啊,呜呜~~~~~~~~~~~~

[shuyi]

我用tcp做过一个聊天带游戏的程序，需要的话我发原代码给你

[ozw]

服务器端的Winsock接受连接时是这样写的吗？
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
DoEvents
Winsock1.Accept requestID
End Sub

[qaymuic]

必须是两个socket。因为，你不能断开tcp协议socket的连接。建议你全部采用udp协议，这样，只要一个socket，客户端只是按命令重绘窗体。其他的事交给服务器去做。

[lanren_me]

Private Sub tcpServer_ConnectionRequest(ByVal requestID As Long)
If tcpServer.State <> sckClosed Then
tcpServer.Close '检查控件的State属性是否为关闭的。
End If '如果不是，在接受新的连接之前先关闭此连接。
tcpServer.Accept requestID
End Sub