超級列表框資料庫操作

㈠ 易語言怎樣在超級列表框里顯示ACCESs資料庫

這種列程應該比較多吧,我最近想寫的一個軟體也有這個功能 附上源碼你參考下吧

.版本 2.支持庫 iext
.程序集 起動窗口程序集
.子程序 __啟動窗口_創建完畢
.判斷開始 (外部資料庫1.打開MDB資料庫 (取運行目錄 () ＋ 「\data\mpdata.mdb」, , 「mp611」, , ) ＝ 真)
信息框 (「歡迎使用加菲豬售後管理系統」, 0, )
.默認
信息框 (「系統啟動失敗！」, 0, )
.判斷結束
刷新列表框 ()

.子程序 刷新列表框
.局部變數 記錄集句柄, 整數型
.局部變數 索引, 整數型

記錄集句柄 ＝ 外部資料庫1.查詢 (「select * from wxdj」)
超級列表框1.全部刪除 ()
.判斷循環首 (外部資料庫1.尾記錄後 (記錄集句柄) ＝ 假)
索引 ＝ 超級列表框1.插入表項 (, 外部資料庫1.讀 (記錄集句柄, 「djbh」), , , , )
超級列表框1.置標題 (索引, 1, 外部資料庫1.讀 (記錄集句柄, 「yhxm」))
超級列表框1.置標題 (索引, 2, 外部資料庫1.讀 (記錄集句柄, 「lxdh」))
超級列表框1.置標題 (索引, 3, 外部資料庫1.讀 (記錄集句柄, 「sjggxh」))
超級列表框1.置標題 (索引, 4, 外部資料庫1.讀 (記錄集句柄, 「sjch」))
超級列表框1.置標題 (索引, 5, 外部資料庫1.讀 (記錄集句柄, 「gzms」))
超級列表框1.置標題 (索引, 6, 外部資料庫1.讀 (記錄集句柄, 「sxrq」))
超級列表框1.置標題 (索引, 7, 外部資料庫1.讀 (記錄集句柄, 「sxry」))
超級列表框1.置標題 (索引, 8, 外部資料庫1.讀 (記錄集句柄, 「fhrq」))
超級列表框1.置標題 (索引, 9, 外部資料庫1.讀 (記錄集句柄, 「tzqj」))
外部資料庫1.到後一記錄 (記錄集句柄)
.判斷循環尾 ()
外部資料庫1.關閉記錄集 (記錄集句柄)

㈡ 易語言如何把從mssql資料庫讀出來的信息全部顯示在超級列表框內

自己建資料庫連接1，記錄集1，超級列表框1(顯示你的內容)，你具體資料庫的欄位名我不知道，只好用列名代替，你可以自己更改變你相應的欄位名，代碼如下：

.版本 2

.支持庫 eDB

.支持庫 iext

.程序集 窗口程序集_啟動窗口

.子程序 __啟動窗口_創建完畢

.局部變數 客戶編號, 整數型

.局部變數 客戶名稱, 文本型

.局部變數 客戶地址, 文本型

.局部變數 索引, 整數型

.如果 (資料庫連接1.連接SQLServer (SQL所在伺服器IP地址, 「客戶信息」, 「sa」, 「」) ＝ 真)

記錄集1.置連接 (資料庫連接1)

記錄集1.打開 (「select * from 表名 where 條件」, #SQL語句, )

.如果真 (記錄集1.記錄數量 ＝ 0)

信息框 (「暫沒找到你所需要的數據！」, 0, )

返回 ()

.如果真結束

超級列表框1.全部刪除 ()

記錄集1.到首記錄 ()

.判斷循環首 (記錄集1.尾記錄後 ＝ 假)

記錄集1.讀整數 (「客戶編號」, 客戶編號)

記錄集1.讀文本 (「客戶名稱」, 客戶名稱)

記錄集1.讀文本 (「客戶地址」, 客戶地址)

索引 ＝ 超級列表框1.插入表項 (-1, 「」, , , , )

超級列表框1.置標題 (索引, 0, 到文本 (客戶編號))

超級列表框1.置標題 (索引, 1, 客戶名稱)

超級列表框1.置標題 (索引, 2, 客戶地址)

記錄集1.到下一條 ()

.判斷循環尾 ()

記錄集1.關閉 ()

資料庫連接1.關閉 ()

.否則

信息框 (「連接不成功」, 0, )

㈢ 【易語言】如何把超級列表框的數據內容保存到MDB資料庫！！

.版本 2
.支持庫 iext

.局部變數 變數, 整數型

.計次循環首 (超級列表框_主窗口.取表項數 (), 變數)
外部版資料庫.執行 ("insert into 進貨表權
(貨品名稱, 規格, 單位, 數量, 單價, 金額, 單據編號, 進貨日期, 入帳時間) values ('" + 超級列表框_主窗口.取標題 (變數 － 1, 0) + "','" + 超級列表框_主窗口.取標題 (變數 － 1, 1) + "','" + 超級列表框_主窗口.取標題 (變數 － 1, 2) + "','" + 超級列表框_主窗口.取標題 (變數 － 1, 3)+"','"+ 超級列表框_主窗口.取標題 (變數 － 1, 4) + "','" + 超級列表框_主窗口.取標題 (變數 － 1, 5) + "','" + 超級列表框_主窗口.取標題 (變數 － 1, 6) + "','" + 超級列表框_主窗口.取標題 (變數 － 1, 7)+ "','" + 超級列表框_主窗口.取標題 (變數 － 1, 8) + "')", )
.計次循環尾 ()