|
5精币
变量名 | 类 型 | 静态 | 数组 | 备 注 | number | 文本型 | | | numberrt | 文本型 | | | password | 文本型 | | | passwordrt | 文本型 | | | 记录集行数 | 整数型 | | | 是否最后 | 逻辑型 | | | n | 整数型 | | |
登录表 = 连接MySql (“u4qszn3j.2331.dnstoo.com”, “radiostation_f”, “jasonwhite”, “radiostation”, 5506 )如果 (登录表 = 0 )标签1.标题 = “连接失败”标签1.标题 = “连接成功”执行SQL语句 (登录表, “set names GBK”) number = 编辑框1.内容 password = 编辑框2.内容 执行SQL语句 (登录表, “select * from user”)验证 = 取记录集 (登录表 )记录集行数 = 取记录集行数 (验证 )计次循环首 (记录集行数, n )读字段值 (验证, “number”, numberrt )读字段值 (验证, “password”, passwordrt )如果 (number = numberrt 且 password = passwordrt )读字段值 (验证, “number”, 账号 )读字段值 (验证, “user”, 用户名 )读字段值 (验证, “music”, 音乐播放器 )读字段值 (验证, “工作时间”, 工作时间 )如果 (用户名 = “admin”)载入 (控制台, , 假)_启动窗口. 销毁 ()载入 (窗口1, , 假)_启动窗口. 销毁 ()释放记录集 (验证)断开MySql (登录表 )到下一行 (验证)计次循环尾 ()标签1.标题 = “账号或密码错误!”
|
-
有这句就崩溃,没有就不崩溃
-
最佳答案
查看完整内容
[e=0].版本 2
.子程序 _按钮1_被单击
.局部变量 number, 文本型
.局部变量 numberrt, 文本型
.局部变量 password, 文本型
.局部变量 passwordrt, 文本型
.局部变量 记录集行数, 整数型
.局部变量 是否最后, 逻辑型
.局部变量 n, 整数型
登录表 = 连接MySql (“u4qszn3j.2331.dnstoo.com”, “radiostation_f”, “jasonwhite”, “radiostation”, 5506)
.如果 (登录表 = 0)
标签1.标题 = “连接失败”
.否则
.如果结束
...
|