如何將Excel數(shù)據(jù)轉(zhuǎn)換為SQL腳本？前言：有的時(shí)候用戶可以提供excel格式的數(shù)據(jù)（肯定是關(guān)系錯(cuò)綜復(fù)雜的數(shù)據(jù)，刪選一些列導(dǎo)入），具體的要求我們文件導(dǎo)入系統(tǒng)，可是我們系統(tǒng)完全沒(méi)有這個(gè)功能，我們總肯定不

如何將Excel數(shù)據(jù)轉(zhuǎn)換為SQL腳本？

前言：有的時(shí)候用戶可以提供excel格式的數(shù)據(jù)（肯定是關(guān)系錯(cuò)綜復(fù)雜的數(shù)據(jù)，刪選一些列導(dǎo)入），具體的要求我們文件導(dǎo)入系統(tǒng)，可是我們系統(tǒng)完全沒(méi)有這個(gè)功能，我們總肯定不能一條一條數(shù)據(jù)錄入吧，那樣的話得花廢多少人力物力呀。本文將能介紹一種方法，真接寫(xiě)公式將數(shù)據(jù)轉(zhuǎn)換為條件數(shù)據(jù)庫(kù)的SQL腳本，然后再再將這些SQL在系統(tǒng)中執(zhí)行，只必須花費(fèi)幾分鐘的時(shí)間。

解決的辦法方法步驟不勝感激：

1、工具需求

（1）excel

2、必須我們?cè)俅蜷_(kāi)用戶提供的excel數(shù)據(jù)，鼠標(biāo)定位到第一行數(shù)據(jù)的還有一個(gè)單元格（這里是F2單元格）

（1）輸入,在雙引號(hào)里面寫(xiě)入到INSERT語(yǔ)句腳本，這里舉例oracle語(yǔ)句的insertinto語(yǔ)句，格式萬(wàn)分感謝

3、然后把鼠標(biāo)定位到兩個(gè)中間，排列選擇類型到欄位不對(duì)應(yīng)的單元格，如第一列的值定位到A2，正當(dāng)此時(shí)公式里面的值就變?yōu)榱薃2，意思那是USER_CODE的值那是A2單元格的值，第二列第三列的依次類推.

（1）之后把鼠標(biāo)光標(biāo)弄到公式最后面，再按Enter鍵，那樣的話第一行的公式就寫(xiě)再說(shuō)，如圖1

4、鼠標(biāo)再導(dǎo)航儀到第一行的公式，鼠標(biāo)左鍵摁往后面拖拽到數(shù)據(jù)行的最后一行，后再松開(kāi)按鍵，這樣全部的公式就生成完了，如圖

如何將ACCESS數(shù)據(jù)庫(kù)導(dǎo)入到SQLSERVER？

var

excelx,excely,excelz:string;

excelapp,workbook:olevariant;

excelrowcount,i:integer;

begin

ifopendialog.executethen

begin

try

excelapp:createoleobject();

//workbook:excelapp;

workbook:();//在用opendialog對(duì)話框指定你

//excel檔路徑

;

excelrowcount:

如何將Excel數(shù)據(jù)轉(zhuǎn)換為SQL腳本？

withquery1do

begin

locked;

;

(deletefromcode);//再一次文件導(dǎo)入的時(shí)候把以前的導(dǎo)入記錄徹底刪除

execsql;

end;

fori:2toexcelrowcount1do

begin

excelx:excelapp.cells[i,2].value;//導(dǎo)入第二列的數(shù)據(jù)

excely:excelapp.cells[i,17].value;//導(dǎo)出來(lái)第17列的數(shù)據(jù)

withquery1do

begin

close;

;

(insertintocode(kahao,bumen)values(:a,:b));

(a).value:excelx;//excel檔的第一列插到到aa表的a欄位;

(b).value:excely;//excel檔的第二列再插入到不是a表的b欄位;

execsql;//你要導(dǎo)入幾列，自己定義

end;

end;

finally

;

;

excelapp:unassigned;

workbook:unassigned;

showmessage(導(dǎo)出順利！);

end;

end;

我用過(guò)了的。這個(gè)可以用！

一些不必要的東西自己消掉！