在易语言中如何将数据添加到access数据库中?

在易语言中如何将数据添加到access数据库中?,第1张

据库连接1.连接Access (取运行目录 () + “数据库名称”, “没数据库密码时为空”)。

记录集1.置连接 (数据库连接1)。

记录集1.打开 (“SELECT * FROM 数据库表名”, #SQL语句, )。

记录集1.添加 ()。

记录集1.写文本 (“姓名”, 编辑框_姓名.内容)。

记录集1.写文本 (“身份z号”, 编辑框_身份z号.内容)。

记录集1.更新 ()。

记录集1.关闭 ()。

数据库连接1.关闭 ()。

注意 数据库名、表名、字段名、字段类型 是否填写错误。

.版本 2

.子程序 _按钮1_被单击

.局部变量 昵称, 文本型

.局部变量 账号, 文本型

.局部变量 密码, 文本型

.局部变量 查找结果1, 逻辑型

.局部变量 查找结果2, 逻辑型

打开 (“客户资料.edb”, , , , , , )

置当前库 (“客户资料.edb”)

昵称 = 编辑框_昵称.内容

账号 = 编辑框_账号.内容

密码 = 编辑框_密码.内容

查找结果1 = 查找 (读 (#昵称) = 昵称) ' #昵称为数据库中的名称,保存在常量表中;昵称为上面定义的编辑框_昵称.内容

查找结果2 = 查找 (读 (#账号) = 账号) ' #账号为数据库中的名称,保存在常量表中;账号为上面定义的编辑框_账号.内容

.如果真 (查找结果1 = 真)

信息框 (昵称 + “已经存在!”, #警告图标, )

返回 ()

.如果真结束

.如果真 (查找结果2 = 真)

信息框 (账号 + “已经存在!”, #警告图标, )

返回 ()

.如果真结束

.如果 (加记录 (昵称, 账号, 密码))

信息框 (“注册成功”, 0, )

.否则

信息框 (“注册失败”, 0, )

.如果结束

关闭 ()

你尝试一下这段代码吧,还有根本不用计次循环这么麻烦,只要用数据库中的查找命令就可以了! 代码是随手写的,没测试过哦,自己测试下有什么问题!

保存在常量表中的常量:

.版本 2

.常量 昵称, ""昵称""

.常量 账号, ""账号""


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/10037029.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-04
下一篇2023-05-04

发表评论

登录后才能评论

评论列表(0条)

    保存