|
100精币
|
处理数据 | | | |
参数_数据 | 字节集 | | | | 参数_连接id | 整数型 | | | | 参数_句柄 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 请求 | 请求 | | | 请求头 | 文本型 | | | 返回_客户信息 | 文本型 | | | x | 整数型 | | | y | 整数型 | | | xx | 整数型 | | | 是否可以登录 | 逻辑型 | | | a | 整数型 | | | min | 文本型 | | | max | 文本型 | | | add | 文本型 | | | 局_user | 文本型 | | | 局_可否登录 | 文本型 | | | 局_积分 | 文本型 | | | 局_返回 | 文本型 | | | 局_公告 | 文本型 | | | 局_主机信息 | 客户信息_ | | | 变量_句柄 | 整数型 | | | 变量_连接id | 整数型 | | |
变量_句柄 = 参数_句柄 变量_连接id = 参数_连接id 请求. 置读数据 (参数_数据 )请求头 = 请求. 读文本型 ()是否可以登录 = 真 判断 (请求头 = “返回用户名”)返回_客户信息 = 请求. 读文本型 ()计次循环首 (超级列表框1. 取表项数 (), y )判断 (超级列表框1. 取标题 (y - 1, 2 ) = 返回_客户信息 )是否可以登录 = 假 请求. 写文本型 (“重复登录”)判断 (服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) )调试输出 (“错误”)跳出循环 ()计次循环尾 ()x = 超级列表框1. 插入表项 (, , , , , )超级列表框1. 置标题 (x, 1, 到文本 (参数_连接id )) 超级列表框1. 置标题 (x, 2, 返回_客户信息 )超级列表框1. 置标题 (x, 3, 时间_格式化 (取现行时间 (), “yyyy-MM-dd”, “ hh:mm:ss”, 真)) 超级列表框1. 置标题 (x, 4, 到文本 (参数_句柄 )) 调试输出 (“插入:”, 参数_连接id, 返回_客户信息, 参数_句柄 )判断 (是否可以登录 )请求. 写文本型 (“可以登录”)判断 (服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) )判断 (请求头 = “获取config”)检测数据库可否执行 ()mysql. 执行SQL (“select * from test.config”)a = mysql. 取记录集 ()判断 (mysql. 取记录集行数 (a ) = 1 )mysql. 读字段文本 (a, “min”, min )mysql. 读字段文本 (a, “max”, max )mysql. 读字段文本 (a, “add_”, add )请求. 写文本型 (“返回config”)请求. 写文本型 (min )请求. 写文本型 (max )请求. 写文本型 (add )服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) mysql.释放记录集 (a)判断 (请求头 = “cha询状态”)局_user = 请求. 读文本型 ()检测数据库可否执行 ()mysql. 执行SQL (“select kefoudenglu from test.userinfo where user = '” + 局_user + “'”)a = mysql. 取记录集 ()判断 (mysql. 取记录集行数 (a ) = 1 )mysql. 读字段文本 (a, “kefoudenglu”, 局_可否登录 )请求. 写文本型 (“返回可否登录状态”)请求. 写文本型 (局_可否登录 )服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) 判断 (请求头 = “cha询积分”)局_user = 请求. 读文本型 ()检测数据库可否执行 ()mysql. 执行SQL (“select jifen from test.userinfo where user = '” + 局_user + “'”)调试输出 (“cha询积分”)a = mysql. 取记录集 ()判断 (mysql. 取记录集行数 (a ) = 1 )mysql. 读字段文本 (a, “jifen”, 局_积分 )局_积分 = 到文本 (到整数 (局_积分 )) 请求. 写文本型 (“返回积分”)请求. 写文本型 (局_积分 )服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) 判断 (请求头 = “获取到期时间”)局_user = 请求. 读文本型 ()检测数据库可否执行 ()mysql. 执行SQL (“select time_end from test.userinfo where user = '” + 局_user + “'”)a = mysql. 取记录集 ()判断 (mysql. 取记录集行数 (a ) = 1 )mysql. 读字段文本 (a, “time_end”, 局_返回 )请求. 写文本型 (“返回到期时间”)请求. 写文本型 (局_返回 ) 服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) 判断 (请求头 = “加积分”)请求. 读文本型 (局_user )请求. 读文本型 (局_积分 )检测数据库可否执行 ()判断 (mysql. 执行SQL (“update test.userinfo set jifen = jifen + ” + 局_积分 + “ where user = '” + 局_user + “'”)) 请求. 写文本型 (“返回加积分”)请求. 写文本型 (“成功”)服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) 请求. 写文本型 (“返回加积分”)请求. 写文本型 (“失败”)服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) 判断 (请求头 = “获取公告”)局_公告 = 苏鹏_数据库_获取单内容 (“config”, “gonggao”, “id = '0'”)请求. 写文本型 (“返回公告”)请求. 写文本型 (局_公告 )服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ()) 判断 (请求头 = “服务器是否在线”)请求. 写文本型 (“返回服务器是否在线”)请求. 写文本型 (“true”)服务端. 发送字节集 (变量_句柄, 变量_连接id, 请求. 取写数据 ())
就是这里的代码出错的
本质上:就是hpsocket+mysql.东西很简单,不知道到底是哪里出错了.
hpsocket的多线程???不应该啊,我全部包裹了许可证啊...让我甚至怀疑是不是dll出问题了..
|
|