轉文字檔 |
尚未結案
|
cyl
中階會員 發表:163 回覆:171 積分:66 註冊:2002-07-11 發送簡訊給我 |
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
您好! 請將您的語法改為如下:
begin ADOConnection1.Connected := True; ADOConnection1.Execute('Select * Into tb_export_test From [test.txt] In "C:\" "Text;"'); end;另外再提一下有關從外部檔案匯入資料至資料庫的另一個有關的問題, 經小弟測試, *.Txt(Text形態)的檔案資料, 可用如上ADOConnection的Execute方法做匯入和匯出的處理, 但如果是*.Xls(Excel形態)或者*.Html(Html形態)的匯入和匯出, 就不能使用ADOConnection元件的Execute方法(會出錯ISAM), 需要用ADOQuery元件的ExecSQL來處理(ADOQuery元件已正常連上上游的ADOConnection元件, 舉例如下: 一.Excel檔案匯入資料庫 begin ADOQuery1.SQL.Text := 'Select * Into tb_export_test From [test] In "C:\Test.xls" "Excel 8.0"'; ADOQuery1.ExecSQL; ADOQuery1.Close; end; //以上的[test]指的是Test.xls檔案中Sheet的名稱二. Html檔案匯入資料庫 begin ADOQuery1.Close; ADOQuery1.SQL.Text := 'Select * Into tb_export_test From [test.Html] In "C:\" "HTML EXPORT"'; ADOQuery1.ExecSQL; end;參考看看! ===================== 努力,相信會獲得美麗! 忻晟 發表人 - cashxin2002 於 2003/09/29 20:00:58
------
忻晟 |
sos_admin
版主 發表:121 回覆:697 積分:768 註冊:2003-07-23 發送簡訊給我 |
|
chiehmin
高階會員 發表:13 回覆:134 積分:134 註冊:2002-05-23 發送簡訊給我 |
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
chiehmin您好﹗ 該可以是針對產生新的資料表而言﹐可以配合FileExists函數來判斷該資料表是否存在﹐若不存在則新增資料表﹐若存在便先刪除該資料表再做新增﹒
當然也是有變通的方法寫入舊資料表中﹐先用以上方法產生新的資料表﹐而后再用SQL語法(Insert Into Old_TableName Select * From New_TableName)﹐只是說Old_TableName和New_TableName的欄位結構需相同﹒ 參考看看﹗ =====================
努力,相信會獲得美麗!
忻晟
------
忻晟 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |