|
发表于 2015-9-23 03:03:48
|
显示全部楼层
河北省张家口市
.版本 2
提示窗口信息 = “正在登陆”
载入 (提示窗口, , 假)
按钮1.禁止 = 真
ID = 编辑框1.内容
.判断开始 (ID = “”)
信息框 (“帐号不能为空”, 0, )
按钮1.禁止 = 假
.判断 (编辑框2.内容 = “”)
信息框 (“密码不能为空”, 0, )
按钮1.禁止 = 假
.默认
.如果 (飘零判断查询 (“admin”, “ID”, “密码='” + 编辑框2.内容 + “'” + “ and ” + “等级='管理员'”, , ID) = 真)
.如果 (飘零修改 (“admin”, “是否在线='” + “是” + “'”, “ID='” + ID + “'”) = 真)
.如果 (飘零修改 (“admin”, “硬盘ID='” + 到文本 (取硬盘特征字 ()) + pl88 + “'”, “ID='” + ID + “'”) = 真)
提示窗口信息 = “正在读取数据”
载入 (管理窗口, , 假)
_启动窗口.销毁 ()
.否则
信息框 (“登陆失败”, 0, )
按钮1.禁止 = 假
.如果结束
.否则
信息框 (“登陆失败”, 0, )
按钮1.禁止 = 假
.如果结束
.否则
信息框 (“登陆失败,你不是管理员,或密码错误”, 0, )
按钮1.禁止 = 假
.如果结束
.判断结束
提示窗口.销毁 ()
|
|