连接MYSQL数据库实现登录注册附易辅助模块

编辑框_帐号.获取焦点 ()
MYSQL句柄 ＝ 连接MySql (“localhost”, “root”, “root”, “yidiandi”, )
.如果 (MYSQL句柄 ≠ 0)
' 调试输出 (MYSQL句柄)
SQL ＝ “select * from yidiandi_1”
.如果真 (执行SQL语句 (MYSQL句柄, SQL) ＝ 假)
信息框 (“SQL语句错误”, #警告图标, “一点滴提示：”)
返回 ()
.如果真结束
记录集句柄 ＝ 取记录集 (MYSQL句柄)
' 调试输出 (记录集句柄)
读字段值 (记录集句柄, “password”, user)
调试输出 (user)
.否则
信息框 (“MYSQL数据库连接失败”, #错误图标, “一点滴提示：”)