请问:怎样一次执行多条sql语句?

MoMoMo11111 2003-02-08 03:29:36
比如说,我要插入3条记录,我现在这样写:
rs.cliear;
str:='insert into a values('test1');
rs.sql.add(str);
rs.open;
rs.close;

rs.cliear;
str:='insert into a values('test2');
rs.sql.add(str);
rs.open;
rs.close;

rs.cliear;
str:='insert into a values('test3');
rs.sql.add(str);
rs.open;
rs.close;

有办法执行一次rs.open就能把这3条都写到库里么?

谢谢啦
...全文
81 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
MoMoMo11111 2003-02-08
  • 打赏
  • 举报
回复
谢谢啦。
东部一绝 2003-02-08
  • 打赏
  • 举报
回复
写错了吧,
//最好再用事务
try
//开始事务。。。
for i:=1 to 3 do
begin
with rs do
begin
close;sql.clear;
//动态组织test变量
。。。
str:='insert into a values(‘+test+')’;
sql.add(str);
execsql;
end;
end;
//提交事务
except
//回滚事务
end;
d983074 2003-02-08
  • 打赏
  • 举报
回复
rs.close
str1:='...';
str2:='...';
str3:='...';
rs.sql.add(str1);
rs.sql.add(str2);
rs.sql.add(str3);
rs.open;
醉马不肖 2003-02-08
  • 打赏
  • 举报
回复
存储过程

5,379

社区成员

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

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