检查_sql = “SELECT COUNT(*) AS nums FROM cashshopdata WHERE accountid = '” + 编辑框_注册账号.内容 + “';”检查_返回 = 记录集1. 打开 (检查_sql, #SQL语句, )如果 (检查_返回 = 真)编辑框_日志. 加入文本 (“→检查_sql执行成功-----” + #换行符 )记录集1. 读文本 (“nums”, nums )如果 (数值 (nums ) ≠ 1 )注册_SQL = “INSERT INTO cashshopdata (accountid, 其他字段) VALUES ('” + 编辑框_注册账号.内容 + “', 其他值);”注册_返回 = 记录集1. 打开 (注册_SQL, #SQL语句, )如果 (注册_返回 = 真)记录集1. 关闭 ()编辑框_日志. 加入文本 (“→账号注册成功” + #换行符 )编辑框_日志. 加入文本 (“→账号注册失败” + #换行符 )编辑框_日志. 加入文本 (“→[” + 编辑框_注册账号.内容 + “]账号已存在” + #换行符 )调试输出 (nums)编辑框_日志. 加入文本 (“→检查_sql执行失败-----” + #换行符 )
|