主要介绍了Python TCPServer 多线程多客户端通信的实现,文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价值，需要的朋友们下面随着小编来一起学习学习吧
2021-11-20 22:40:39
170KB
1
最近要做Socket通信项目，自己先学习写了个Demo，分享上来，代码简单完整，通俗易懂，适合初学者
2021-11-15 13:30:24
108KB
1
发现网上关于vbrichclient的教程比较少，但这个实在是好东西，实用性，稳定性都比VB自带的winsock好的多，多客户端不用winsock控件数组。 也不用在各窗体上放winsock，直接在模块中就能实现收发
下面直接上代码，窗体和文本钮、按钮大家自行拖放。要用到VB自带隐藏函数varptr()取内存指针(VbMsdn中没有这个函数，实际上很简单^^)。
VbRichClient5.0.38中包含sqlite3.9支持
上面共享中也包含VbRichClient5.0.38支持库
VbRichClient代替winsock
主要使用
cTCPServer
cTCPClient
cUDP
'---------------------------------------------------------------------
'服务器端，代码最简化，要实现多客户端只要用数组存hsocket就可以
Option Explicit
Dim WithEvents sv As cTCPServer
Dim WithEvents udp1 As cUDP
Dim cHsocket&
Private Sub Form_Load()
Set sv = New cTCPServer
sv.Listen sv.GetHost("127.0.0.1"), 35912
Debug.Print sv.GetHost("")
Set udp1 = New cUDP
udp1.Bind "127.0.0.1", 5616
End Sub
Private Sub sv_DataArrival(ByVal hSocket As Long, ByVal BytesTotal As Long, ByVal FirstBufferAfterOverflow As Boolean)
Dim d() As Byte, s$
ReDim d(BytesTotal - 1)
sv.GetData hSocket, VarPtr(d(0)), BytesTotal '★★关键代码
s = d
Text2.Text = Text2.Text & s & vbCrLf
Debug.Print "收到：" & BytesTotal
End Sub
Private Sub sv_TCPAccepted(ByVal hSocket As Long)
cHsocket = hSocket
Text1.Text = Text1.Text & sv.GetPeerHostIPAndPort(hSocket) & vbCrLf
End Sub
Private Sub sv_TCPDisConnect(ByVal hSocket As Long)
Text3.Text = Text3.Text & sv.GetPeerHostIPAndPort(hSocket) & vbCrLf
End Sub
Private Sub udp1_NewDatagram(ByVal BytesTotal As Long, ByVal FirstBufferAfterOverflow As Boolean)
Dim d() As Byte, s$
ReDim d(BytesTotal - 1)
udp1.GetData VarPtr(d(0)), BytesTotal
s = d
Text2.Text = Text2.Text & s & vbCrLf
End Sub
'-------------------------------------------------------
'客户端
Option Explicit
Dim WithEvents cl As cTCPClient
Dim WithEvents udp1 As cUDP
Dim cid&
Private Sub Command1_Click()
cid = cl.Connect("QgB1", 35912)
End Sub
Private Sub Command2_Click()
cl.Disconnect cid
End Sub
Private Sub Command3_Click()
Dim b() As Byte
b = Text1.Text
cl.SendData cid, VarPtr(b(0)), UBound(b) + 1
End Sub
Private Sub Command4_Click()
Dim d() As Byte, s$
s = "yessss"
d = s
udp1.RemoteIP = "127.0.0.1"
udp1.RemotePort = 5616
u
2021-11-03 14:38:12
3KB
1
DuckChat 是一个安全的私有聊天软件 独立部署 / 消息加密 / 安装简单 / 提供App 产品特点 1. 独立部署，消息加密，安全通道。 2. 支持客户端Web网页端，提供手机客户端App（App s
2021-10-09 17:21:14
4.93MB
1
vb.net Socket服务端支持多客户端连接，并且实时监控客户端是否断开连接，代码注释明了，初学者很容易看得懂
2021-10-06 17:12:30
87KB
1
DuckChat 是一个安全的私有聊天软件
私有部署 / 安全可靠 / 随意定制
低成本快速搭建 / 单机网站模式 / 超大集群模式[500+服务器]
1.0.7版本更新：
语音消息
群成员列表
小程序权限判断
表情符号消息支持
客户端支持（手机端可通往App store/Android市场下载）：
Android / iOS / PC 网页版
部署服务器支持：
Linux / Windows / 虚拟空间
连接方式：
HTTP轮询模式 / 长连接模式
DuckChat 通讯系统（开源IM系统）是一款即时通讯解决方案，源代码部署的方式，可以帮助你快速拥有一套自己的移动社交、企业办公、多功能业务产品。
功能特性：
完善的基础通讯功能
支持单人聊天、群聊
支持文字、图片、语音等多种类型的消息
支持扩展h5特殊消息、以及其他多种多媒体交互类型
卓越的访问速度和负载能力
支持集群扩展的模式，理论上支持无限制的用户同时使用
支持多种数据库对接系统，以适应不同用户量
支持高级VIP定制，为用户量超大的服务「量身定做」
安全性
自己搭建，安全可靠，消息不会泄露。
支持多重保密方案，解决中间人攻击、后台监控等多种消息泄露问题
小程序扩展以及界面灵活配置
支持小程序开发，以插件模式配置进客户端，丰富客户端业务。
管理后台可以配置软件的界面、业务菜单栏、特殊消息等等。
甚至可以设置小程序界面为主页，让业务内容更清晰明确。
安装方法
环境要求：建议使用php7.2版本，最低支持版本为php5.6。
Docker搭建步骤：
1、安装Docker
2、下载源码，并在终端（命令行程序）cd 到 duckchat.sh 所在目录。
3、启动/关闭程序
sudo sh duckchat.sh
sudo sh duckchat.sh stop
Linux下搭建步骤：
1、搭建PHP + Nginx服务，配置phpfpm、nginx，并启动成功。
2、从Github下载源代码，复制src目录下的所有内容，到网站根目录。
3、为根目录和所有子目录赋予权限。(执行命令：chmod -R 777 .)
Windows下搭建步骤：
1、下载 XAMPP 安装后服务。
2、找到 XAMPP 的网站根目录[xampp安装地址]/htdocs，删除原有的默认代码。
3、下载源代码，复制src目录下的内容到网站根目录
4、启动 XAMPP Control 管理平台，点击启动apache。
5、打开浏览器，访问localhost，程序部署安装完毕。
教程文档: http://duckchat.akaxin.com/wiki/
2021-10-04 13:44:25
2.32MB
1
1. 满足具有Socket客户端需求的基本应用.
2. 满足具有Socket服务端的基本应用. 具备并发能力, 能满足可设定个数客户端连接.
参考个人博客: http://blog.csdn.net/ostrichmyself/article/details/6618349
2021-09-26 09:11:52
9KB
1
Netty中实现多客户端连接与通信-以实现聊天室群聊功能为例示例代码
2021-09-03 15:38:15
84KB
1