|

2精币
本帖最后由 huigeziba 于 2010-11-15 12:52 编辑
我下载啦【小唯】的聊天室源码.我想吧它添加一个网路等级的东西.太难啦.我不知道怎么
做.所以来问问大家.希望大家能给个好答复....都是来学习的....谢谢
这是客户代码
聊天总窗口.加入文本 (分割数据 [2] + #换行符)
.判断 (分割数据 [1] = “登录”)
.判断开始 (分割数据 [2] = “成功”)
_启动窗口.禁止 = 假
登录窗口.销毁 ()
姓名标签.标题 = 分割数据 [3]
等级.标题 = 分割数据 [4]?????就是这段!老不行!
用户列表框.清空 ()
.计次循环首 (取数组下标 (分割数据, ) - 4, 次数)
用户列表框.加入项目 (分割数据 [次数 + 4], )
.计次循环尾 ()
.默认
信息框 (“账号或密码错误。”, #信息图标, “登录失败”)
这是服务器代码
.判断 (分割数据 [1] = “登录”)
.计次循环首 (取记录数 (), 次数)
跳到 (次数)
.如果真 (读 (#用户名) = 分割数据 [2] 且 读 (#密码) = 分割数据 [3])
信息列表框.置标题 (次数 - 1, 4, “在线”)
信息列表框.置标题 (次数 - 1, 5, 客户地址)
信息列表框.置标题 (次数 - 1, 6, “假”)
.计次循环首 (取记录数 (), 循环)
.如果真 (信息列表框.取标题 (循环 - 1, 3) = “在线”)
a = a + “|” + 信息列表框.取标题 (循环 - 1, 3)
.如果真结束
.计次循环尾 ()
服务器1.发送数据 (客户地址, “登录|成功|” + 信息列表框.取标题 (次数 - 1, 2) + “|” + a, )
.计次循环首 (取记录数 (), 循环)
.如果真 (信息列表框.取标题 (循环 - 1, 3) = “在线” 且 循环 ≠ 次数)
服务器1.发送数据 (信息列表框.取标题 (循环 - 1, 4), “读取在线用户|” + a, )
.如果真结束
.计次循环尾 ()
聊天记录.加入文本 (分割数据 [2] + “ 进入了。” + “[” + 到文本 (取小时 (取现行时间 ())) + “:” + 到文本 (取分钟 (取现行时间 ())) + “:” + 到文本 (取秒 (取现行时间 ())) + “]” + #换行符)
返回 ()
.如果真结束
.计次循环尾 ()
服务器1.发送数据 (客户地址, “登录|失败”, )
哎不知道该在哪里加上字符?!= = |
|