Query1.SQL.Clear;
Query1.SQL.Add('UPDATE T003 SET message=''hello'' WHERE no=''00000001''');
Query1.ExecSQL;
query1.Active :=true;运行时提示enoresultset 信息为 error creating cursor handle
我看了帮助,enoresultset是在query执行非select时抛出的异常可没写怎样解决。
Query1.SQL.Add('UPDATE T003 SET message=''hello'' WHERE no=''00000001''');
Query1.ExecSQL;
query1.Active :=true;运行时提示enoresultset 信息为 error creating cursor handle
我看了帮助,enoresultset是在query执行非select时抛出的异常可没写怎样解决。
解决方案 »
- tcpclient/server的数据发送与接收
- 如何求两个数组的并集?
- 我的程序在退出后还有进程驻留在内存,如何释放?
- 关于登陆窗口的问题
- 请教:如何删除access数据库中带有时间过滤条件的记录啊?'DELETE FROM USERS WHERE TIME <'''+DATETIMETOSTR(TIME)+''''对吗?
- delphi与access煤数据库连接问题
- *.pdg文件使用什么工具打开呀?up有分!
- 请问:在ToolBar上加SpeedButton时,SpeedButton正中会出现一条竖线。如何消除这条竖线??
- 有谁知道如何设置BDE(about sql sever)
- 关于文件及目录操作的问题
- 我用TerminateThread(FirstThread.handle,0);为什么无法中止线程?
- 谁能救救我?
改成这样试试Query1.SQL.Clear;
Query1.SQL.Add('UPDATE T003 SET message=''hello'' WHERE no=''00000001''');
Query1.ExecSQL;
with Query1 do
begin
Close;
Unprepare;
SQL.Clear;
SQL.Text :='select *from T003';
Active :=true;
end;
Query1.SQL.Add('UPDATE T003 SET message=''hello'' WHERE no=''00000001''');
Query1.ExecSQL;