求解决“当前程序不支持从单一执行返回多个记录集”错误

feng__007 2012-05-21 08:49:27
with DataModule1.ADOquery10 do
begin
close;
SQL.Clear;
SQL.Add('delete * from 停车费用表');
SQL.Add('where');
SQL.Add('ParkID='+Quotedstr(edit5.text));
ExecSQL;
Active:=true;
end;

上面是我的删除语句,编译时没有错误,但在运行时出现“当前程序不支持从单一执行返回多个记录集”错误,结果是记录成功被删除,求解决办法!
...全文
316 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
shao113112 2012-05-28
  • 打赏
  • 举报
回复
记录成功删除说明不是这里出错啊。。

这里没什么问题。

可能前后其他query 出问题了。。
kaikai_kk 2012-05-25
  • 打赏
  • 举报
回复
select用open (Active:=true;就相当于open)
update,delete,exec 等用ExecSQL
hnu_0720 2012-05-25
  • 打赏
  • 举报
回复
SQL语句这样写呢?
delete tabe_name where 条件?
编程保姆 2012-05-25
  • 打赏
  • 举报
回复
低级错误
zwgttt 2012-05-22
  • 打赏
  • 举报
回复
1.楼主,sql的删除语句你能不能直接写成“delete from 停车费用表”

2.删除以后就不要用Active:=true;,除非删除以后,你先close;sql.Clear;sql.add('select * from 停车费用表');open;然后再Active:=true;
蓝色光芒 2012-05-21
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 的回复:]
不要加 Active:=true;
这个相当于open
[/Quote]

支持。


[Quote=引用 2 楼 的回复:]

别用Add,直接写 sql.text := 'xxxxxxx'
[/Quote]
就本例来说有区别吗? 有吗?
bdmh 2012-05-21
  • 打赏
  • 举报
回复
别用Add,直接写 sql.text := 'xxxxxxx'
天外飞仙 2012-05-21
  • 打赏
  • 举报
回复
不要加 Active:=true;
这个相当于open

5,939

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧