易语言服务器客户端为什么连接不上？
不知道为什么客户端连接不上，我设置了客户端能连接 标题 ＝ “成功” 不能 标题 ＝ “失败” 但是运行后标题并没有改变，求大佬们解答！
第一个是客户端代码
第二个是服务器代码
.版本 2
.支持库 Exmlrpc
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 客户端, 请求客户端
.子程序 __启动窗口_创建完毕
.参数 结果, 逻辑型
.局部变量 处理函数, 子程序指针
结果 ＝ 客户端.连接 (6666, “127.0.0.1”, 假, &处理函数)
.如果 (结果)
标题 ＝ “成功”
.否则
标题 ＝ “失败”
.如果结束
' 异步； 消息发过去后不管了
' 同步； 消息发送过去 立即让其返回数据回馈
.子程序 处理函数
.参数 消息地址, 整数型
调试输出 (消息地址)
.子程序 _发送_被单击
客户端.异步发送字节集 (到字节集 (编辑框输入.内容))
.版本 2
.支持库 Exmlrpc
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 服务器, 远程服务
.子程序 __启动窗口_创建完毕
.局部变量 结果, 逻辑型
结果 ＝ 服务器.启动 (6666, &处理函数, ) ' 子程序指针就是让你给他一个子程序
.如果 (结果)
标题 ＝ “成功”
.否则
标题 ＝ “失败”
.如果结束
' 函数=方法=子程序=命令
.子程序 处理函数
.参数 消息地址, 整数型
.局部变量 消息类型, 整数型
.局部变量 请求代码, 文本型
.局部变量 结果信息, 字节集
' 就是客户连接、请求、发送数据会调用当前子程序
' 客户获得消息类型可以获得消息内容
' 有个参数 内容就是客户端发来的消息地址 可以通过该地址获得详细内容
消息类型 ＝ 服务器.取消息类型 (消息地址)
.判断开始 (消息类型 ＝ 0)
' 客户进入
.判断 (消息类型 ＝ 1)
' 客户离开
.判断 (消息类型 ＝ 2)
' 消息进入
服务器.取请求字节集 (消息地址, 请求代码, 结果信息)
调试输出 (到文本 (结果信息))
.判断 (消息类型 ＝ 3)
.判断 (消息类型 ＝ 0)
.默认
.判断结束