开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 2494|回复: 4
收起左侧

[易语言纯源码] 第④期十二课mysqlzc登录 cha询实例

[复制链接]
发表于 2019-2-2 15:07:14 | 显示全部楼层 |阅读模式   山东省聊城市
分享源码
界面截图:
是否带模块: 纯源码
备注说明: -
本帖最后由 时光海苔 于 2019-2-2 15:08 编辑


  
子程序名返回值类型公开备 注
_按钮_zc_被单击  
变量名类 型静态数组备 注
确认密码文本型 
密码文本型 
用户名文本型 
sql文本型 
执行结果逻辑型 
用户名 = 编辑框_zc用户名.内容
密码 = 编辑框_zc密码.内容
确认密码 = 编辑框_zc确认密码.内容
如果真 (用户名 = “” 密码 = “” 确认密码 = “”)
信息框 (“参数不能为空”, 0, , )
返回 ()
如果真 (密码 ≠ 确认密码)
信息框 (“两次密码不一致”, 0, , )
返回 ()
如果真 (连接句柄 = 0)
连接句柄 = 连接MySql (“localhost”, “root”, “root”, “e”, )

如果真 (连接句柄 = 0)
信息框 (“连接数据库失败了”, 0, , )
返回 ()
sql = “insert into users values('','”编码_gb2312到utf8 (用户名)“','”编码_gb2312到utf8 (密码)“')”
执行结果 = 执行SQL语句 (连接句柄, sql)
如果真 (执行结果 = )
信息框 (“zc数据失败了”, 0, , )
返回 ()
信息框 (“zc成功”, 0, , )
选择夹1.现行子夹 = 1


i支持库列表   支持库注释   
mysqlMySql支持库


  
子程序名返回值类型公开备 注
_按钮_登录_被单击  
变量名类 型静态数组备 注
用户名文本型 
密码文本型 
连接句柄整数型 
sql文本型 
执行结果逻辑型 
用户名 = 编辑框_登录用户名.内容
密码 = 编辑框_登录密码.内容
如果真 (用户名 = “” 密码 = “”)
信息框 (“参数不能为空”, 0, , )
返回 ()
如果真 (连接句柄 = 0)
连接句柄 = 连接MySql (“localhost”, “root”, “root”, “e”, )
' 调试输出 (连接句柄)
如果真 (连接句柄 = 0)
信息框 (“链接数据库失败了”, 0, , )
返回 ()
sql = “select * from users where username='” + 用户名 + “' and password='” + 密码 + “'”
' 调试输出 (sql)
执行结果 = 执行SQL语句 (连接句柄, sql)
如果真 (执行结果 = )
信息框 (“用户名或密码不正确”, 0, , )
返回 ()
信息框 (“登录成功了”, 0, , )
载入 (窗口1, , )


i支持库列表   支持库注释   
mysqlMySql支持库

每日一贴:mysql常规操作
知识点:mysql操作
删除 和修改没写哈,都一样的

点评

语句只要是对的执行都是成功的!你这样登录的话就存在一个很大的漏洞!   广西壮族自治区钦州市  发表于 2019-2-2 18:30

结帖率:100% (3/3)

签到天数: 19 天

发表于 2019-2-12 16:27:03 | 显示全部楼层   山东省青岛市
可以吧应户名 登陆的 账号密码 读出来之后 判断,更安全
回复 支持 反对

使用道具 举报

发表于 2019-2-2 19:34:34 | 显示全部楼层   河南省洛阳市
明文验证登陆??
回复 支持 反对

使用道具 举报

结帖率:100% (9/9)

签到天数: 23 天

发表于 2019-2-2 15:22:59 | 显示全部楼层   河北省邯郸市
用完记得关闭SQL连接
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 诚聘英才| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 800073686,邮箱:800073686@b.qq.com
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表