易语言读写数据库操作详解

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

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

.子程序 _按钮_插入数据_被单击


.如果 (test数据库.打开 (“E:\易语言\自己做的小软件\测试文件\test.db”, 假) ＝ 假)
  信息框 (“打开数据库失败！”, 0, , )
  返回 ()
.否则
  调试输出 (“打开数据库成功!”)
.如果结束

.如果 (student表.打开 (“student”, test数据库) ＝ 假)
  信息框 (“打开表失败！”, 0, , )
  返回 ()
.否则
  调试输出 (“打开表成功!”)
.如果结束

student表.插入 ()
student表.写字段值 (“name”, “张三”)
student表.写字段值 (“age”, 3)
.如果 (student表.提交 ())
  调试输出 (“插入表数据成功!”)
.否则
  信息框 (“插入表数据失败!”, 0, , )
.如果结束


.子程序 _按钮_读取数据_被单击
.局部变量 i, 整数型
.局部变量 student_所有记录, 文本型, , "0"
.局部变量 表项索引, 整数型

超级列表框1.全部删除 ()

.如果真 (test数据库.是否已打开 () ＝ 假)
  test数据库.打开 (“E:\易语言\自己做的小软件\测试文件\test.db”, 假)
.如果真结束

.如果真 (student表.是否已打开 () ＝ 假)
  student表.打开 (“student”, test数据库)
.如果真结束

student_所有记录 ＝ student表.取所有记录 (假)
调试输出 (student_所有记录)

.计次循环首 (student表.取记录个数 (), i)
  表项索引 ＝ 超级列表框1.插入表项 (-1, student_所有记录 [i] [1], , , , )
  超级列表框1.置标题 (表项索引, 1, student_所有记录 [i] [2])
  超级列表框1.置标题 (表项索引, 2, student_所有记录 [i] [3])
.计次循环尾 ()