下载地址:https://6yunpan.pipipan.com/fs/17009107-375104141
.版本 2 .程序集 Main .子程序 _启动子程序,整数型,请在本子程序中放置易模块初始化代码 .局部变量 WSAData,WSADATA ‘ 本源码来自易语言资源网 ‘ (www.eyuyan.la) .如果真 (WSAStartup (514,WSAData) ≠ 0) 输出调试文本 (“WSA 初始化失败”) 返回 (0) .如果真结束 ‘ 改自此帖开源 感谢原作者开源 https://bbs.125.la/forum.PHP?mod=viewthread&tid=14039123&highlight=websocket ‘ 有问题私信论坛 测试程序 () 返回 (0) ‘ 可以根据您的需要返回任意数值 .子程序 测试程序 .局部变量 封包,字节集,"0" .局部变量 ws,WebSocket .局部变量 i,整数型 .如果真 (ws.连接 (“ws://127.0.0.1:8080/”)) ws.发送 (到字节集 (“I‘m coming”)) .计次循环首 (ws.接收 (封包),i) .如果真 (封包 [i] = 到字节集 (“心跳”)) ws.发送 (到字节集 ("好巧 我的心也在跳") .如果真结束 .如果真 (封包 [i] = 到字节集 (“停止心跳”)) 跳出循环 () .如果真结束 Sleep (100) .计次循环尾 () ws.断开 ()