本文目录一览:
- 1、易语言客户端服务端
- 2、易语言怎么做与服务端与客户端
- 3、易语言 请求客户端
易语言客户端服务端
.版本 2
.程序集 窗口程序集1
.程序集变量 客户, 文本型
.子程序 __启动窗口_创建完毕
服务器1.端口 = 19730
' 这里是将服务器跟客户端放在同一个窗口下写的
' 客户1连接服务器的3个条件,1:服务端已经运行。2:服务地址填写正确。3:端口要一致
' 本机测试用127.0.0.1就可以了,外网的话根据外网IP填写,或用域名解析。例如 花生壳等软件,解析后直接填入域名。
' 端口 0-65535 只要不跟其他程序使用的端口冲突就可以
.如果真 (客户1.连接 (“127.0.0.1”, 19730) = 假)
信息框 (“连接服务器失败!”, 0, )
返回 ()
.如果真结束
信息框 (“连接服务器成功!”, 0, )
.子程序 _服务器1_客户进入
' 当客户连接进来以后可以先取回这个客户的IP,等下发送数据数用得到,有多个客户连接的话可以用数组保存
客户 = 服务器1.取回客户 ()
.子程序 _按钮2_被单击
' 客户发送数据
客户1.发送数据 (“客户1发送来的数据”)
.子程序 _按钮1_被单击
' 服务器发送数据
服务器1.发送数据 (客户, “服务器1发送来的消息”, )
.子程序 _客户1_数据到达
.局部变量 消息, 文本型
' 客户取回服务器发来的消息
' 接收到的数据时字节集型的,先到下文本
消息 = 到文本 (客户1.取回数据 ())
信息框 (消息, 0, )
' 当然,如果发送的不是文本,而是一个文件、一张图片的话,就不用到文本了。而应该用一个字节集型的变量来接收
.子程序 _服务器1_数据到达
.局部变量 消息, 文本型
' 接收客户发送的数据
消息 = 到文本 (服务器1.取回数据 ())
信息框 (消息, 0, )
易语言怎么做与服务端与客户端
添加服务器 和 客户 组件,服务器设置端口 客户这边登入,加一点特征字辨认信息的发送类型就好了!非常简单!
易语言 请求客户端
要用 异步连接
.子程序 收到数据
.参数 消息
.局部变量 M
.局部变量 结果, 字节集
' 如果服务器关闭或者与客户的连接意外断开返回0,如果客户端接收到数据返回1,出错返回-1。
M = 客户端.取消息类型 (消息)
.如果真 (M = 0)
信息框(“已经断开连接”)
.如果真结束