易语言【第四篇】数据库操作

本文转载自查看原文 2020-10-04 13:24 409 易语言

原生数据库

操作Sqlite3数据库

配置支持库

可视化操作

表设计

插入数据

.版本 2
.支持库 sqlite3

.程序集 窗口程序集_启动窗口
.程序集变量 程序集_Sqlit3数据库, Sqlite数据库

.子程序 _按钮1_被单击
.局部变量 局部表, Sqlite表

.如果真 (程序集_Sqlit3数据库.打开 (取运行目录 () ＋ “\sqlitedb.db”, 假) ＝ 假)
    信息框 (“打开数据库失败”, 0, , )
    返回 ()
.如果真结束

.如果真 (局部表.打开 (“Table1”, 程序集_Sqlit3数据库) ＝ 假)
    信息框 (“打开表失败”, 0, , )
    返回 ()
.如果真结束

局部表.插入 ()
局部表.写字段值 (“productName”, “产品2号”)
局部表.写字段值 (“Num”, 150)
局部表.提交 ()
局部表.关闭 ()

demo

读取数据

.版本 2
.支持库 sqlite3
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 程序集_Sqlit3数据库, Sqlite数据库

.子程序 _按钮1_被单击
.局部变量 局部表, Sqlite表
.局部变量 SQL, 文本型
.局部变量 临时_记录集, Sqlite记录集

.如果真 (程序集_Sqlit3数据库.打开 (取运行目录 () ＋ “\sqlitedb.db”, 假) ＝ 假)
    信息框 (“打开数据库失败”, 0, , )
    返回 ()
.如果真结束

.如果真 (局部表.打开 (“Table1”, 程序集_Sqlit3数据库) ＝ 假)
    信息框 (“打开表失败”, 0, , )
    返回 ()
.如果真结束

SQL ＝ 取文本 (“SELECT * From %s where uid<10”, “Table1”)
调试输出 (SQL)

临时_记录集.置SQL语句 (SQL, 程序集_Sqlit3数据库)
.如果真 (临时_记录集.打开 () ＝ 假)
    输出调试文本 (“记录集打开失败，” ＋ 程序集_Sqlit3数据库.取错误文本 ())
    返回 ()
.如果真结束

.如果真 (临时_记录集.首记录前 ())
    临时_记录集.到下一记录 ()
.如果真结束
调试输出 (临时_记录集.取所有记录 (假))

.计次循环首 (临时_记录集.取记录个数 (), )
    临时_记录集.到下一记录 ()
    输出调试文本 (临时_记录集.读字段文本值 (“productName”, ))

.计次循环尾 ()

临时_记录集.关闭 ()

demo