易語言把excel當資料庫
1. 易語言如何查詢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. 易語言如何查詢excel資料庫
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.內容 = 外部資料庫1.讀 (記錄集句柄1, loopnum) .變數循環尾 () 外部資料庫1.到後一記錄 (記錄集句柄1) tempnum = tempnum + 1 tempnumtext = 到文本 (tempnum) .判斷循環尾 () ' Excel工作簿1.保存 (取當前目錄 () +「\」 + 年級數 +「.xls」) ' Excel工作簿1.關閉 ()
3. 易語言中如何將excel直接轉換成edb資料庫
沒有行代碼可以直接轉的
你可以自己寫命令,把表格內容讀入變數里