如何在DELPHI中將資料從EXCEL匯入SQL資料庫

單元介面部分引用了 comobj 單個虛擬手部元素（用途）。

procedure : tobject);

var excelx,excely : string;

begintry

workbook :=;使用“OpenDialog”對話方塊進行指定。

Excel 檔案路徑。

false;

excelrowcount :=;

for i :=1 to excelrowcount + 1 do

beginexcelx :=,1].value;

excely :=,2].value;

if ((1].value = and (,2].value = then

指定excel檔案的第i行，第1行和第2行（視情況而定）如果情況為空，則退出，這樣的設定，最好是讓你的檔案強制，這兩行對應資料庫中不能為空的資料。

exitelse

with query1 do

beginclose;

into test(name,address) values(:name,:address));

parambyname('name').asstring :=excelx;excel 檔案的第一列插入到測試表的 name 列中;

parambyname('address').asstring :=excely;excel 檔案的第二列插入到測試表的位址欄位中;

execsql;

end;end;

finally

workbook :=unassigned;

end;end;

1.開啟 SQL

server

management

studio，按照圖中的路徑進入匯入資料介面。

2.匯入時，需要準備Excel檔案，無法開啟。 單擊“下一步”。

3.資料來源：選擇“Microsoft”

Excel “除了 Excel 型別的資料，SQL 還支援許多其他資料來源型別。

4.選擇要匯入的 Excel 檔案。 單擊“瀏覽”並找到匯入的檔案“確定”。

5.確認檔案路徑沒有問題，然後單擊下一步。

6.預設值為 WinODWS 身份驗證，改用 SQL 身份驗證。 輸入資料庫密碼，注意：database，這裡檢視是否是匯入的資料庫。 您也可以在此處更改它以選擇其他資料庫。

7.如果有多個工作表，或者不想在工作表中匯入某些資料，則可以編寫查詢來匯入指定的資料。 單擊“下一步”。

8.選擇要匯入的工作表，例如，將工作表名稱更改為“Price”，將 SQL 資料庫表設定為“Price$”。 單擊以轉到下一步。

9.單擊以轉到下一步。

10.此處顯示匯入資訊和執行內容，確認無誤後，單擊“完成”開始執行。

11.您可以看到任務執行的過程和進度。

12.執行成功：可以檢視執行結果，已傳輸1754行，表示已從excel工作表匯入了1754條資料，包括列標題。 這樣就行了，執行SQL查詢語句：select

fromprice$ 檢視已匯入資料的內容。