線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:954
推到 Plurk!
推到 Facebook!

有關ADOTable存檔讀檔問題

答題得分者是:terrychen
shinshenglee
一般會員


發表:1
回覆:1
積分:0
註冊:2004-02-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-02-10 15:16:01 IP:203.69.xxx.xxx 未訂閱
請問各位先進,小弟設計一click事件後,在ADOTABLE開啟檔案,但是似乎資料尚未存至資料庫,不知如何將所開啟之檔案由第一筆逐一的存到資料庫,請問各位大大是否有好意見能指引小弟一條明路 if (OpenDialog1->Execute()) { ADOTable1->LoadFromFile(OpenDialog1->FileName); }
terrychen
尊榮會員


發表:90
回覆:794
積分:501
註冊:2003-05-01

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-02-10 15:34:12 IP:61.221.xxx.xxx 未訂閱
您好: 參考http://delphi.ktop.com.tw/topic.php?TOPIC_ID=28125 ~~應無所住而生其心~~
shinshenglee
一般會員


發表:1
回覆:1
積分:0
註冊:2004-02-04

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-02-10 16:00:13 IP:211.74.xxx.xxx 未訂閱
感謝這位仁兄的指導.. 不過這程式碼似乎是用Delphi的語法? 小弟不才..可否用BCB的語法告知ㄋ?
terrychen
尊榮會員


發表:90
回覆:794
積分:501
註冊:2003-05-01

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-02-10 16:20:59 IP:61.221.xxx.xxx 未訂閱
您好: BCB的語法我也不熟,大概是像下面那樣,不對的地方自己改一下 如回圈的用法..我只會將BEGIN END改為{},『.』改為-> 原理是利用回圈,將ADOTable1載進來的資料一筆一筆APPEND進資料庫 應該不用範例您也會的  
while not ADOTable1->Eof do
{
  ADOQuery1->Append;
  for I := 0 to ADOTable1->Fields->Count - 1 do
  ADOQuery1->Fields[I].AsVariant := ADOTable1->Fields[I]->AsVariant;//一ㄍ欄位一ㄍ欄位丟
  ADOQuery1->Post;
  Next;
}     
~~應無所住而生其心~~ 發表人 - Terrychen 於 2004/02/10 16:22:41
系統時間:2024-03-28 17:28:52
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!