如何將ACCESS數(shù)據(jù)庫(kù)導(dǎo)入到SQLSERVER？varexcelx,excely,excelz:string;excelapp,workbook:olevariant;excelrowcount,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:

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

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)出第17列的數(shù)據(jù)

withquery1do

begin

closed;

;

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

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

(b).value:excely;//excel檔的第二列插入到到0,0表的b欄位;

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

end;

end;

finally

;

excelapp.quit;

excelapp:unassigned;

workbook:unassigned;

showmessage(文件導(dǎo)入成功！);

end;

end;

我用過(guò)了的?？梢杂?！

一些不必要的東西自己可以去掉！

如何在電子表格中使用公式編輯器？

方法/步驟

1、然后打開(kāi)Excel文件，在excel2007的插入欄位再點(diǎn)擊插入-對(duì)象！

2、在插入到對(duì)象選項(xiàng)卡中,選擇新建項(xiàng)--公式編輯器3.0，再點(diǎn)確定！

3、再次出現(xiàn)數(shù)學(xué)公式編輯器不提示，直接再點(diǎn)是就可以了！緊接著會(huì)彈出對(duì)話框好處教程！會(huì)建議使用的就略過(guò)！

4、公式編輯器再次出現(xiàn)后，中,選擇正二十邊形公式形式的格式，按格式輸入輸入就行了！

5、本例再輸入一個(gè)時(shí)間函數(shù)公式！公式編輯器然后輸入的公式是最比較漂亮的了！