|
|
发表于 2013-6-7 15:35:47
|
显示全部楼层
广东省广州市
网络客户端.异步发送字节集 (到字节集 (昵称.内容+"<>" + 帐号.内容+"<>" +密码.内容+"<>" +重复密码.内容+"<>" +问题.内容+"<>" +问题密码.内容+"<>" +超级密码.内容+"<>" +邮箱.内容))
[e]
.版本 2
.支持库 Exmlrpc
.支持库 iext
.子程序 回调函数
.参数 消息地址, 整数型
.局部变量 客户句柄, 整数型
.局部变量 客户IP, 文本型
.局部变量 消息类型, 整数型
.局部变量 i, 整数型
.局部变量 数据, 字节集
.局部变量 请求代码, 文本型
.局部变量 分割字节集数据, 字节集, , "0"
服务器.取客户句柄 (消息地址, 客户句柄) ' 首先取出客户句柄
服务器.取客户IP (客户句柄, 客户IP) ' 再取出客户IP’可要可不要,所有的返回数据都是根据句柄
消息类型 = 服务器.取消息类型 (消息地址) ' 断开,数据到达,进入,错误
.判断开始 (消息类型 = 2) ' 有数据进入
服务器.取请求字节集 (消息地址, 请求代码, 数据)
分割字节集数据 = 分割字节集 (数据, 到字节集 (“<>”), 8)
超级列表框1.插入表项 (, , , , , )
.计次循环首 (取数组成员数 (分割字节集数据), i)
超级列表框1.置标题 (超级列表框1.取表项数 () - 1, 0, 到文本 (分割字节集数据 [i - 1]))
.计次循环尾 ()
[/e] |
|