易语言服务器客户端为什么连接不上?
不知道为什么客户端连接不上,我设置了客户端能连接标题 = “成功”不能 标题 = “失败” 但是运行后标题并没有改变,求大佬们解答!第一个是客户端代码第二个是服务器代码.版本 2
.支持库 Exmlrpc
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 客户端, 请求客户端
.子程序 __启动窗口_创建完毕
.参数 结果, 逻辑型
.局部变量 处理函数, 子程序指针
结果 = 客户端.连接 (6666, “127.0.0.1”, 假, &处理函数)
.如果 (结果)
标题 = “成功”
.否则
标题 = “失败”
.如果结束
' 异步; 消息发过去后不管了
' 同步; 消息发送过去 立即让其返回数据回馈
.子程序 处理函数
.参数 消息地址, 整数型
调试输出 (消息地址)
.子程序 _发送_被单击
客户端.异步发送字节集 (到字节集 (编辑框输入.内容))
.版本 2
.支持库 Exmlrpc
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 服务器, 远程服务
.子程序 __启动窗口_创建完毕
.局部变量 结果, 逻辑型
结果 = 服务器.启动 (6666, &处理函数, )' 子程序指针就是让你给他一个子程序
.如果 (结果)
标题 = “成功”
.否则
标题 = “失败”
.如果结束
' 函数=方法=子程序=命令
.子程序 处理函数
.参数 消息地址, 整数型
.局部变量 消息类型, 整数型
.局部变量 请求代码, 文本型
.局部变量 结果信息, 字节集
' 就是客户连接、请求、发送数据会调用当前子程序
' 客户获得消息类型可以获得消息内容
' 有个参数内容就是客户端发来的消息地址 可以通过该地址获得详细内容
消息类型 = 服务器.取消息类型 (消息地址)
.判断开始 (消息类型 = 0)
' 客户进入
.判断 (消息类型 = 1)
' 客户离开
.判断 (消息类型 = 2)
' 消息进入
服务器.取请求字节集 (消息地址, 请求代码, 结果信息)
调试输出 (到文本 (结果信息))
.判断 (消息类型 = 3)
.判断 (消息类型 = 0)
.默认
.判断结束
第二个是服务端代码 打错了! 你想失败?
端口号你写65536就失败了。因为端口的范围值为0-.版本 2
.支持库 Exmlrpc
.子程序 __启动窗口_创建完毕
.局部变量 结果, 逻辑型
结果 = 服务器.启动 (65536, &处理函数, )' 子程序指针就是让你给他一个子程序
.如果 (结果)
标题 = “成功”
.否则
标题 = “失败”
.如果结束
' 函数=方法=子程序=命令
65535
改下。你写错了啊。
改成下面的
admin 发表于 2020-8-31 16:41
改下。你写错了啊。
解决了,谢谢大佬!:) 感谢各位大佬已经解决了:) 楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
页:
[1]