請教各位前輩： 小弟使用ADOQuery1.loadfromfile(filename)後 資料便一直存在於記憶體當中 請問該如何清除 若不清除，這個ADOQuery便不能再做其他的查詢使用 ~~應無所住而生其心~~

試試看 Type A = Class( TAdoDataset ) ; end ; ........ ........ A( AdoQuery1 ).CloseCursor

terrychen 你好 不是使用AdoQuery1.Close;就可以了嗎?

hi, 你可以先將 ADOQuery1.SQL.Clear, 然後再設定好 ADOQuery1.Connection 後, 給定 SQL Command 即可!

感謝回應： Chance36、的做法小弟已試過，可惜一樣達不到情除的效果 timhuang大大的做法會出現『檔案名稱、目錄名稱或磁碟區標籤語法錯誤』 James大大的做法小弟試過以後，在去做其他資料的查詢 即select * from ... 會出現ADOquery1: field '' not find 請前輩在指點 ~~應無所住而生其心~~ 發表人 - terrychen 於 2004/04/10 15:31:56

測試一下並不知道您所說的情況是怎樣 ,以下是我測試的 Code

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Text := 'select * from employee' ;
  ADOQuery1.Open;
  ADOQuery1.SaveToFile('C:\AAA.XML');
  ADOQuery2.LoadFromFile('C:\AAA.XML');
end;    procedure TForm1.Button2Click(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.LoadFromFile('C:\AAA.XML');
  ADOQuery2.Close;
  ADOQuery2.LoadFromFile('C:\AAA.XML');
end;

用 MSSQL 裡面的 pubs 資料庫測試 , 感覺沒有什麼問題耶

引言:即select * from ... 會出現ADOquery1: field '' not find

terrychen 你好 由於TAdoQuery的LoadFromFile或SaveToFile會把ADoquery的CommandType改成cmdFile,以致於後面要執行SQL指令時CommandType仍為cmdFile所以Adoquery把你的SQL指令當成檔案名稱來處理了。 然而ADoQuery並沒開放CommandType讓我們修改，於是嘗試強制轉型，轉成TAdoDataset(因為它有CommandType屬性且與TAdoQuery有相同的祖先)後再來改成cmdText,果然可以了。 AdoQuery1.LoadFromFile('......'); 之後 Adoquery1.Close; TADODataSet(AdoQuery1).CommandType := cmdText; AdoQuery1.SQL.Text := 'Select * From ....'; AdoQuery1.Open; 發表人 - chance36 於 2004/04/10 18:30:43

引言: 測試一下並不知道您所說的情況是怎樣 ,以下是我測試的 Code

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Text := 'select * from employee' ;
  ADOQuery1.Open;
  ADOQuery1.SaveToFile('C:\AAA.XML');
  ADOQuery2.LoadFromFile('C:\AAA.XML');
end;    procedure TForm1.Button2Click(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.LoadFromFile('C:\AAA.XML');
  ADOQuery2.Close;
  ADOQuery2.LoadFromFile('C:\AAA.XML');
end;

用 MSSQL 裡面的 pubs 資料庫測試 , 感覺沒有什麼問題耶

感謝回應 請您試試，按完Button1再按Button2然後再按Button1就會出現小弟說的錯誤訊息 ~~應無所住而生其心~~

引言:

引言:即select * from ... 會出現ADOquery1: field '' not find

terrychen 你好 由於TAdoQuery的LoadFromFile或SaveToFile會把ADoquery的CommandType改成cmdFile,以致於後面要執行SQL指令時CommandType仍為cmdFile所以Adoquery把你的SQL指令當成檔案名稱來處理了。 然而ADoQuery並沒開放CommandType讓我們修改，於是嘗試強制轉型，轉成TAdoDataset(因為它有CommandType屬性且與TAdoQuery有相同的祖先)後再來改成cmdText,果然可以了。 AdoQuery1.LoadFromFile('......'); 之後 Adoquery1.Close; TADODataSet(AdoQuery1).CommandType := cmdText; AdoQuery1.SQL.Text := 'Select * From ....'; AdoQuery1.Open;

謝謝Chance36大大回應 小弟試過以後，果然可以，真是太感謝了 ~~應無所住而生其心~~

奇怪 , 一直測不出同樣的問題 !! 莫非您是使用 Delphi 5 的 ADO ?

引言: 奇怪 , 一直測不出同樣的問題 !! 莫非您是使用 Delphi 5 的 ADO ?

小弟使用過D5、6、7都會耶 ~~應無所住而生其心~~