[code delphi]
ADOQuery5.Close;
ADOQuery5.SQL.Clear;
ADOQuery5.SQL.Text := '';
ADOQuery5.SQL.Add('Insert into ' TableName '(t1, t2, t3)');
ADOQuery5.SQL.Add(' select Top 2000 t1, t2, t3 from SearchTable ');
ADOQuery5.ExecSQL;
[/code]

請問在ADOQuery5.ExecSQL完成後，ShowMessage，但我要如何知道ADOQuery5.ExecSQL已完成呢??

謝謝

答案就在Online Help裡面～看看他的傳回值就知道了。
Description
Call ExecSQL to execute the SQL statement currently assigned to the SQL property. Use ExecSQL to execute queries that do not return a cursor to data (such as INSERT, UPDATE, DELETE, and CREATE TABLE).

ExecSQL returns an integer value reflecting the number of rows affected by the executed SQL statement.
Note: For SELECT statements, call Open instead of ExecSQL or set the Active property to true.
To speed performance, an application should ordinarily prepare the query by setting the Prepared property to true before calling ExecSQL for the first time.

ShowMessage( Inttostr( ADOQuery5.RowsAffected));

------
What do we live for if not to make life less difficult for each other?

我發現就算Access 還沒新增完成，ADOQuery5.RowsAffected 還是一樣是 2000耶??

===================引 用 christie 文 章===================
ShowMessage( Inttostr( ADOQuery5.RowsAffected));

您好
如果您是要確認是否有真的處理成功，可以用
try
...
except
showmessage('處理失敗！')
end;

------
Pillar Wang

A:介绍个DELPHI博客, 自己去找找看. http://iinsnian.cnblogs.com
如果运气好的话，也许找得到你要的答案。:-)