标题:关于winsock问题
只看楼主
孙文
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2016-5-5
结帖率:50%
已结贴  问题点数:20 回复次数:4 
关于winsock问题
客户端跟服务器端已成功建好了链接,但现在出现了问题,就是当我把客户端关闭后再启动(服务器继续运行中),就无法建立链接,只有把客户端跟服务器端都关闭后再重新启动才可以,此问题如何解决!
搜索更多相关主题的帖子: 如何 客户端 服务器 
2016-09-30 11:34
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4912
专家分:29900
注 册:2008-10-15
得分:10 
要看你服务器端的连接代码。
侦听的端口,接受连接是怎么写的。

授人于鱼,不如授人于渔
早已停用QQ了
2016-09-30 16:21
Panda2016
Rank: 2
等 级:论坛游民
威 望:2
帖 子:10
专家分:33
注 册:2016-6-26
得分:10 
回复 楼主 孙文
一旦接受连接申请,便不会继续侦听接口了,所以再连接就失败了。

简单的做法是使用用控件数组。
程序代码:
Private Sub Form_Load()
    Winsock1(0).LocalPort = 1001    '//第一个控件一直处于侦听状态
    Winsock1(0).Listen
    Dim i As Long
    For i = 1 To 255
        Load Winsock1(i)
    Next
End Sub

Private Sub Winsock1_ConnectionRequest(Index As Integer, ByVal requestID As Long)
    Static cnt As Long
    cnt = cnt + 1
    Winsock1(cnt).Accept requestID   '//其他可用控件进行连接
End Sub
2016-10-06 01:03
孙文
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2016-5-5
得分:0 
回复 3楼 Panda2016
兄弟,方便留个QQ咨询下吗?
2016-10-08 09:54
Panda2016
Rank: 2
等 级:论坛游民
威 望:2
帖 子:10
专家分:33
注 册:2016-6-26
得分:0 
2390369200
2016-10-09 22:33



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-469351-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.147610 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved