易語言基礎——讀寫資料庫操作
阿新 • • 發佈:2018-12-26
1.實現效果
2.注意事項:
- 我們先用
SQLiteStudio
建表以及表中欄位(SQLiteStudio工具可百度下載); - 寫程式之前對支援庫進行配置,勾選
Sqlite3資料庫支援庫
而不是Sqlite資料庫支援庫,因為選用後者會出現一些打不開表之類的問題;
3.原始碼
.版本 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])
.計次迴圈尾 ()