|
14精币
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 数据库连接 | 数据库连接 | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 连接字符串 | 文本型 | | | 连接成功 | 逻辑型 | | | 错误信息 | 整数型 | | |
连接字符串 = “Provider=SQ噜阿噜EDB.1;Persist Security Info=False;Initial Catalog=AccountDB” + “;Data Source=127.0.0.1” + “,” + “1433” + “;User ID=sa” + “;Password=1234567”连接成功 = 数据库连接. 连接 (连接字符串 ) 如果真 (连接成功 ) 标签6.标题 = “数据库连接成功!” 返回 ()错误信息 = 数据库连接.取连接超时 ()标签6.标题 = “数据库连接失败!”变量名 | 类 型 | 静态 | 数组 | 备 注 | 插入语句 | 文本型 | | | sql语句 | 文本型 | | | 错误信息 | | | |
如果 (编辑框1.内容 = “”) 信息框 (“请输入正确的账号”, 0, , ) 如果 (编辑框2.内容 = “”) 信息框 (“请输入正确密码”, 0, , )    如果 (编辑框3.内容 ≠ 编辑框2.内容 )  信息框 (“两次输入的密码不正确”, 0, , )   如果 (组合框1.内容 = “”)   信息框 (“请选择分区”, 0, , )                    注册账号 ()sql语句 = “INSERT INTO Tgameuser (userid, passwd, gamecode) VALUES ('” + 编辑框1.内容 + “', '” + 编辑框2.内容 + “', '” + 组合框1.内容 + “')” 如果 (数据库连接. 执行SQL (sql语句, )) 信息框 (“注册成功”, 0, , ) 信息框 (“注册失败”, 0, , )返回()
|
|