UC知道vb6.0里使用winsock 服务端客户端连接问题
来源：百度知道 编辑：UC知道 时间：2024/06/19 08:43:09
我用如下代码向实现：请求连接时不马上接受 通过点一个按钮才建立连接
问下 tcpserver.accept id 怎么写啊
代码：Private Sub tcpserver_ConnectionRequest(ByVal requestID As Long)
'检查控件的 State 属性是否为关闭的。
'如果不是，
'在接受新的连接之前先关闭此连接。
If tcpserver.State <> sckClosed Then _
tcpserver.Close
'接受具有 requestID 参数的’连接。
End If
Label1.Caption = "有连接请求"
End Sub
Private Sub Command1_Click()
tcpserver.Accept requestID
End Sub
Command1_Click当中的 requestID好像失效了 我知道问题处在哪里
我只要求实现我的功能就行 不是要查 错 我这个功能怎么实现呢？
问下 tcpserver.accept id 怎么写啊
代码：Private Sub tcpserver_ConnectionRequest(ByVal requestID As Long)
'检查控件的 State 属性是否为关闭的。
'如果不是，
'在接受新的连接之前先关闭此连接。
If tcpserver.State <> sckClosed Then _
tcpserver.Close
'接受具有 requestID 参数的’连接。
End If
Label1.Caption = "有连接请求"
End Sub
Private Sub Command1_Click()
tcpserver.Accept requestID
End Sub
Command1_Click当中的 requestID好像失效了 我知道问题处在哪里
我只要求实现我的功能就行 不是要查 错 我这个功能怎么实现呢？
tcpserver.Accept requestID
这句话要写在 Private Sub tcpserver_ConnectionRequest(ByVal requestID As Long)
这个过程里面才有用...
还有就是,Listen的winsock和Accept 的winsock最好是分开的,别用一个