5 c3 U; A" ^( f' h' MHP-Socket的PULL组件使用例子 PULL组件使用的人很少因为他需要自己组包,但是还是有人问这个东西所以就发出来了,源码中需要的模块 DLL 证书啥的 可以去 论坛下载中文例子 里面包含了所有的东西复制过去就行了2 g8 H3 e5 l: @! O4 G6 ~
: i- E J: L. z: x8 Q( w, [
hpsocket中文模块使用例子5.8.8
5 T- R& F7 i8 g) I7 whttps://www.hpsocket.cn/forum.ph ... d=109&fromuid=1
% q" i: j# u! L0 o! T b(出处: HPsocket)
& h0 u2 M# p7 d3 `9 N! J: Q: k1 @8 r: K+ X8 n% K0 }
[AppleScript] 纯文本查看 复制代码 .版本 2
.子程序 _按钮_启动_被单击
.局部变量 绑定地址, 文本型
.局部变量 端口, 整数型
绑定地址 = 编辑框_服务器IP.内容
端口 = 7777
全_服务器句柄 = PULL服务端.创建 (选择框_SSL.选中)
.如果真 (选择框_SSL.选中 = 真)
PULL服务端.清理SSL (全_服务器句柄)
PULL服务端.初始化SSL (全_服务器句柄, #SSL_SM_SERVER, “ssl-cert\server.cer”, “ssl-cert\server.key”, “123456”, “ssl-cert\ca.crt”, )
.如果真结束
PULL服务端.事件_监听 (&监听事件)
PULL服务端.事件_客户进入 (&客户进入事件)
PULL服务端.事件_发送 (&发送事件)
PULL服务端.事件_接收 (&接收事件)
PULL服务端.事件_断开 (&客户端断开事件)
PULL服务端.事件_关闭 (&关闭事件)
PULL服务端.事件_握手 (&握手事件)
PULL服务端.置最大连接数 (全_服务器句柄, 2000)
PULL服务端.置发送策略 (全_服务器句柄, 1) ' 0=打包模式 1=安全模式 2=直接模式
PULL服务端.置心跳包间隔 (全_服务器句柄, 6000)
PULL服务端.置异常心跳包间隔 (全_服务器句柄, 7000)
动态设置组件状态 (#ST_STARTING)
.如果 (PULL服务端.启动 (全_服务器句柄, 绑定地址, 端口))
输出日志 (“服务器启动成功监听地址为;” + 绑定地址 + “端口为;” + 到文本 (端口))
PULL服务端.置工作线程数量 (全_服务器句柄, 1000)
动态设置组件状态 (#ST_STARTED)
.否则
输出日志 (“服务器启动失败错误描述为;” + PULL服务端.取错误描述 (全_服务器句柄) + “错误代码为;” + 到文本 (PULL服务端.取错误代码 (全_服务器句柄)) + “)”)
动态设置组件状态 (#ST_STOPED)
$ R* M# u; t' E( } n9 ]
5 i& G8 K' o9 {/ A1 j) M/ Q
6 m) P; B- h; p) V! u% k |