| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1690 人关注过本帖
标题:关于winsock问题
只看楼主 加入收藏
孙文
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2016-5-5
结帖率:50%
收藏
已结贴  问题点数:20 回复次数:4 
关于winsock问题
客户端跟服务器端已成功建好了链接,但现在出现了问题,就是当我把客户端关闭后再启动(服务器继续运行中),就无法建立链接,只有把客户端跟服务器端都关闭后再重新启动才可以,此问题如何解决!
搜索更多相关主题的帖子: 如何 客户端 服务器 
2016-09-30 11:34
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4938
专家分:30047
注 册: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
等 级:新手上路
帖 子:25
专家分: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
快速回复:关于winsock问题
数据加载中...
 
   



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

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