with mcdm.Adoquery4 do     begin       close;       sql.Clear;       sql.Add('delete from data1');       ExecSQL;     end;     我第一次使用以上程序刪除資料，卻發生如下錯誤，請指教：         發表人 - zhczm 於 2004/01/07 15:07:49

Hi:    如果我沒記錯，TADOQUery 無法執行無傳回值之 SQL Command    TQuery 可以 -------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 --------------------------------

------
Fishman

引言: Hi: 如果我沒記錯，TADOQUery 無法執行無傳回值之 SQL Command TQuery 可以 -------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 -------------------------------- < face="Verdana, Arial, Helvetica"> 您好： TADOQUery 可以執行無傳回值之 SQL Command 而當TADOQUery4.open才會出現zhczm所說的訊息 小弟猜想是不是TADOQUery4有何其他程序共用

Hi:    Sorry !! 收回上一篇的話，經測試結果是可以的，也將資料正確刪除 環境： class="code"> procedure TForm1.Button15Click(Sender: TObject); begin ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('delete from fish_test'); ADOQuery1.ExecSQL; end; -------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 --------------------------------

------
Fishman

引言:

引言: Hi: 如果我沒記錯，TADOQUery 無法執行無傳回值之 SQL Command TQuery 可以 -------------------------------- 小弟才疏學淺，若有謬誤請不吝指教 -------------------------------- < face="Verdana, Arial, Helvetica"> 您好： TADOQUery 可以執行無傳回值之 SQL Command 而當TADOQUery4.open才會出現zhczm所說的訊息 小弟猜想是不是TADOQUery4有何其他程序共用

zhczm 您好: 其實Open只能用 select 語法 其他如delete,insert,update,alter.....語法 請用ExecSQL

引言: with mcdm.Adoquery4 do begin close; sql.Clear; sql.Add('delete from data1'); ExecSQL; end; 我第一次使用以上程序刪除資料，卻發生如下錯誤，請指教： 發表人 - zhczm 於 2004/01/07 15:07:49

被偷改了,上面語法看起來沒有問題,我的看法跟 terrychen 一樣,應該是其他的引起的,看起來是很像用了 SELECT 語法,然後用 ExecSQL 執行.. 要不要把 code 貼出來檢視一下?? ---- 我只會兩件事,這也不會,那也不會 ---- 眼見不一定為真

你是不是在哪一段程式裡有下ADOQuery4.Active := True or ADOQuery4.Open呢？建議你用Breakpoints來找看看！ Ian