如何用adoquery的delete方法删除access的多条记录?
begin
adoquery1.first;
for i:=0 to adoquery1.recordrsetcount-1 do
begin
adoquery1.delete;
adoquery1.next;
end;
这样删除为何死机或删除不了记录?不信大家帮我调一调?
还有没有更好的方法,请教.谢谢!
begin
adoquery1.first;
for i:=0 to adoquery1.recordrsetcount-1 do
begin
adoquery1.delete;
adoquery1.next;
end;
这样删除为何死机或删除不了记录?不信大家帮我调一调?
还有没有更好的方法,请教.谢谢!
解决方案 »
- WaitForMultipleObjects死锁
- spcomm控件发送问题!!!
- 我的一个好难的问题>
- fastreport菜鸟问题,欢迎进来领分
- QuickReport横向打印问题,急!!!
- DbGRID中如何让光标移动事件变成oncellclick事件呢?
- 如何在Form上实现两幅图片半透明叠加的效果?而且在程序运行时一幅不动,另一幅要运动。结果合成的图像会不断变化。急。分不够再加。来者
- 我在用AlphaBlend函数时总是提示 缺少运算符或分号 ,怎么回事啊?D7+WinXP平台。
- 哥们儿,给各换心情的法子吧,乱七八糟的事搞得我都快崩溃了!!!
- delphi中的窗体问题。
- 我想写一个COM对象来实现IOBJECTWITHSIT,但我的系统没有这个接口?
- 如何双击ttreeview中的节点ttreenode去执行一段代码.
如果有关联或者是没有主键是不能删除的。
for i:=0 to adoquery1.recordrsetcount-1 do
begin
adoquery1.delete; //删除后指针会移动
adoquery1.next;
end;
你这样删除,肯定会死机的。看看这个吧。(*//
标题:Delphi中建议使用的语句
整理:Zswang
连接:http://www.csdn.net/Expert/TopicView1.asp?id=724036
日期:2002-06-22
支持:[email protected]
//*)
{ No.6 遍历数据集 }
var
I: Integer;
begin
Query1.First;
for I := 0 to Query1.RecordCount - 1 do begin //不建议//容易被影响
Query1.Next;
{};
end;
/////
Query1.First;
while not Query1.Eof do begin //建议
{ }
Query1.Next;
end;
end;
begin
adoquery1.first;
for i:=0 to adoquery1.RecordCount-1 do
begin
adoquery1.delete;
adoquery1.next;
end;
begin
Close;
SQl.Clear;
SQL.Text := 'delete ..........';
ADoquery1.ExecSQL
end;
adoquery1.first;
while not adoquery1.eof do
adoquery1.delete;还是直接写sql语句删除好,delete from tablename where ......
强烈建议使用一条SQL语句搞定它
然后execsql删除