易語言取資料庫

⑴ 易語言如何查詢excel資料庫拜託各位大神

.版本 2 .支持庫 eExcel2000 Excel工作簿1.置程序 (Excel程序1) ' 設置工作簿於excel程序領導之下 Excel工作簿1.打開 (取當前目錄 () ＋「\」 ＋ 年級數 ＋「.xls」) ' 本來可以加個文件名的,如果沒有文件,則另存為吧. Excel工作簿1.表格序號 ＝ 1 ' 設置第一張表為工作表. Excel程序1.顯示 ＝真 ' 以下是把資料庫中的查詢結果放入excel程序里 tempnum ＝ 1 ' 第一條記錄 tempnumtext ＝ 到文本 (tempnum) 外部資料庫1.到首記錄 (記錄集句柄1) .判斷循環首 (外部資料庫1.尾記錄後 (記錄集句柄1) ＝假) ' 是不是已經到了尾記錄了.如果不是,繼續. .變數循環首 (1, 33, 1, loopnum) ' 共有33個欄位,每行顯示33段,在excel表中表示列.tempnum表示為行 Excel工作簿1.首單元格 ＝ 表列數組 [loopnum] ＋ tempnumtext Excel工作簿1.尾單元格 ＝ 表列數組 [loopnum] ＋ tempnumtext Excel工作簿1.內容格式 ＝「@」 ' 這代表是文本型的數據.本行可讀可寫,你可以先設置好格式,然後讀一下,顯示是什麼,再設置 Excel工作簿1.內容 ＝ 外部資料庫1.讀 (記錄集句柄1, loopnum) .變數循環尾 () 外部資料庫1.到後一記錄 (記錄集句柄1) tempnum ＝ tempnum ＋ 1 tempnumtext ＝ 到文本 (tempnum) .判斷循環尾 () ' Excel工作簿1.保存 (取當前目錄 () ＋「\」 ＋ 年級數 ＋「.xls」) ' Excel工作簿1.關閉 () ' Excel程序1.退出 ()

⑵ 易語言高級表格讀取資料庫內容

我的是這樣弄的：

.版本 2
.支持庫 iext

.子程序 _主窗口_創建完畢

.如果 (文件是否存在 (取運行目錄 () ＋ 「\data\」 ＋ 「特種設備台賬.edb」) ＝ 假)
信息框 (「數據表不存在！」, 16, 「提示」)
.否則
打開 (取運行目錄 () ＋ 「\data\」 ＋ 「特種設備台賬.edb」, , , 4, , 「」, )
.如果結束
_監控時鍾_周期事件 ()
讀取行 ()
透明標簽1.左邊 ＝ 主窗口.寬度 － 透明標簽1.寬度 － (選擇夾1.寬度 － 透明標簽1.寬度) ÷ 2
當前時間.時鍾周期 ＝ 1000

.版本 2
.支持庫 eGrid

.子程序 讀取行
.局部變數 變數1, 整數型

高級表格.置列寬 (0, 0)
高級表格.置列寬 (1, 20)
高級表格.置數據 (0, 1, 1, 「序號」)
高級表格.置列寬 (2, 100)
高級表格.置數據 (0, 2, 1, 「設備名稱」)
高級表格.置列寬 (3, 100)
高級表格.置數據 (0, 3, 1, 「單位內編碼」)
高級表格.置列寬 (4, 100)
高級表格.置數據 (0, 4, 1, 「規格型號」)
高級表格.置列寬 (5, 100)
高級表格.置數據 (0, 5, 1, 「安裝部位」)
高級表格.置列寬 (6, 100)
高級表格.置數據 (0, 6, 1, 「使用證編號」)
高級表格.置列寬 (7, 100)
高級表格.置數據 (0, 7, 1, 「年度檢驗日期」)
高級表格.置列寬 (8, 100)
高級表格.置數據 (0, 8, 1, 「年度檢驗有效期」)
高級表格.置列寬 (9, 100)
高級表格.置數據 (0, 9, 1, 「定期檢驗日期」)
高級表格.置列寬 (10, 100)
高級表格.置數據 (0, 10, 1, 「定期檢驗有效期」)
高級表格.置列寬 (11, 100)
高級表格.置數據 (0, 11, 1, 「安裝就位日期」)
高級表格.置列寬 (12, 100)
高級表格.置數據 (0, 12, 1, 「報廢停用日期」)
高級表格.置列寬 (13, 100)
高級表格.置數據 (0, 13, 1, 「重大維修日期」)
.計次循環首 (取記錄數 (), 變數1)
跳到 (變數1)
高級表格.插入行 (「」, 高級表格.行數)
高級表格.置數據 (高級表格.行數 － 1, 1, 1, 讀 (1))
高級表格.置數據 (高級表格.行數 － 1, 2, 1, 讀 (2))
高級表格.置數據 (高級表格.行數 － 1, 3, 1, 讀 (3))
高級表格.置數據 (高級表格.行數 － 1, 4, 1, 讀 (4))
高級表格.置數據 (高級表格.行數 － 1, 5, 1, 讀 (5))
高級表格.置數據 (高級表格.行數 － 1, 6, 1, 讀 (6))
高級表格.置數據 (高級表格.行數 － 1, 7, 1, 讀 (7))
高級表格.置數據 (高級表格.行數 － 1, 8, 1, 讀 (8))
高級表格.置數據 (高級表格.行數 － 1, 9, 1, 讀 (9))
高級表格.置數據 (高級表格.行數 － 1, 10, 1, 讀 (10))
高級表格.置數據 (高級表格.行數 － 1, 11, 1, 讀 (11))
高級表格.置數據 (高級表格.行數 － 1, 12, 1, 讀 (12))
高級表格.置數據 (高級表格.行數 － 1, 13, 1, 讀 (13))
.計次循環尾 ()
編號排序 ()

⑶ 易語言支持庫和資料庫是什麼如何調用

1、易語言支持庫，支持庫是擴展易語言系統的主要方式之一，也是最有效的方式之一。通過使用其它編程語言為易語言開發支持庫，易語言系統的功能可以得到無限擴展。通過支持庫這一途徑，易語言可以充分整合其它編程語言和操作系統的各種資源。

2、易語言資料庫，易語言的資料庫功能大部分基於XBASE 方式，所以您如果曾經接觸過XBASE資料庫系統中的任何一款，如：DBASE、FOXBASE、FOXPRO 等等，就能夠相當快地了解並應用易語言的資料庫。

3、資料庫的調用必須是由專門的程序語言來進行資料庫的存儲過程，打開指定資料庫，請使用「打開」命令。可以同時打開多個資料庫（其數目僅受Windows 操作系統限制）。

(3)易語言取資料庫擴展閱讀

易語言特點

1、超強的程序編輯器

2、多媒體功能支持強大

3、完善的網路、埠通訊和互聯網功能支持

4、支持調用API底層函數

5、支持標准外部OCX組件

6、可由易語言支持庫無限擴充其功能

7、模塊化開發

⑷ 易語言里怎麼讀取資料庫里的數據到樹形框

『不用外部資料庫，添加一個資料庫連接1控制項：
』假設庫文件名為「產品資料庫.mdb」，庫中的表名為「產品表」，產品欄位名「類別」
全局變數：a文本型
如果真（資料庫連接1.連接Access（取運行目錄（）+「產品資料庫.mdb」，「」）=假）
信息框（「連接資料庫失敗！」，0，）
返回（）
』添加一個記錄集控制項；
記錄集1.置連接（資料庫連接1）
『上面我們已經打開並且連接好了MDB資料庫，接下來我們做讀取和顯示；
記錄集1.打開（「select*from產品表」，#SQL語句，#伺服器端游標）
記錄集1.到首記錄（）
判斷循環首（記錄集1.尾記錄後=假）
記錄集1.讀文本（「類別」，a）
如果真（a=「日用品」）
樹型框1.加入項目（0，a，，，，，）
如果真（a=「洗化用品」）
樹型框1.加入項目（1，a，，，，，）
如果真（a=「洗發水」或a=「洗衣粉」）
樹型框1.加入項目（2，a，，，，，）
記錄集1.到下一條（）
判斷循環尾（）
記錄集1.關閉（）

⑸ 易語言如何調用資料庫

打開（「填寫你資料庫的路徑」）
計次循環首（取記錄數（），i）
跳到（i）
列表框.加入項目（讀（「玩家」））
我手打的，不知道可以不。

⑹ 易語言如何讀取Access資料庫中多個欄位、表名、條件。

【1】.連接Access資料庫代碼！.版本
2
.支持庫
eDB
.如果
(資料庫連接.連接Access
(MDB資料庫,
「」)
＝
真)
記錄集.置連接
(資料庫連接)
排序條件
＝
「欄位，表名，條件」
.如果
(記錄集.打開並排序
(MDB數據表,
排序條件)
＝
真)
.否則
銷毀
()
【2】.填充樹形框欄位到父項目代碼！.版本
2
.支持庫
eDB
.支持庫
iext.局部變數
分類變數,
文本型
.局部變數
樹項目總數,
整數型
.局部變數
樹循環循環,
整數型
.局部變數
臨時項目文本,
文本型
.局部變數
是否存在重復,
整數型
記錄集.到首記錄
()
.判斷循環首
(記錄集.尾記錄後
＝
假)
記錄集.讀文本
(「欄位」,
分類變數)
樹項目總數
＝
樹型框.取項目數
()
.如果
(樹項目總數
＝
0)
樹型框.加入項目
(,
分類變數,
,
,
)
.否則
.計次循環首
(樹項目總數,
樹循環循環)
臨時項目文本
＝
樹型框.取項目文本
(樹循環循環
－
1)
.如果
(臨時項目文本
＝
分類變數)
是否存在重復
＝
1
跳出循環
()
.否則
是否存在重復
＝
0
.如果結束
樹循環循環
＝
樹循環循環
＋
1
.計次循環尾
()
.如果真
(是否存在重復
＝
0)
樹型框.加入項目
(,
分類變數,
,
,
)
.如果真結束
.如果結束
記錄集.到下一條
()
.判斷循環尾
()
【3】.填充表名到樹形框子項目並過濾樹形框存在的重復項！.版本
2
.支持庫
iext
.支持庫
eDB.局部變數
原項目變數,
整數型
.局部變數
原項目循環,
整數型
.局部變數
項目數組,
文本型,
,
"0"
.局部變數
原項目文本,
文本型
.局部變數
新項目變數,
整數型
.局部變數
新項目循環,
整數型
.局部變數
新項目文本,
文本型
.局部變數
新項目標題,
文本型
.局部變數
過濾語句,
文本型
.局部變數
文本數組,
文本型,
,
"0"
.局部變數
文本變數,
文本型
.局部變數
數組成員,
整數型
.局部變數
數組循環,
整數型
.局部變數
次數數量,
整數型
.局部變數
項目變數,
整數型
.局部變數
循環變數,
整數型
.局部變數
次數循環,
整數型
原項目變數
＝
樹型框.取項目數
()
原項目循環
＝
1
.計次循環首
(原項目變數,
原項目循環)
加入成員
(項目數組,
樹型框.取項目文本
(原項目循環
－
1))
.計次循環尾
()
數組成員
＝
取數組成員數
(項目數組)原項目文本
＝
項目數組
[數組循環]
過濾語句
＝
「欄位」
＋
「=」
＋
「'」
＋
原項目文本
＋
「'」
.如果
(記錄集.過濾記錄
(過濾語句)
＝
真)
次數數量
＝
記錄集.記錄數量
清除數組
(文本數組)
.計次循環首
(次數數量,
次數循環)
記錄集.讀文本
(「表名稱」,
文本變數)
加入成員
(文本數組,
文本變數)
次數循環
＝
次數循環
＋
1
記錄集.到下一條
()
.計次循環尾
()
項目變數
＝
樹型框.取項目數
()
.計次循環首
(項目變數,
循環變數)
樹型框.置項目數值
(循環變數
－
1,
循環變數)
.計次循環尾
().否則