各们,请忙解决一数据循环插入的问题!在线等待----------------------

wuweijie 2003-09-15 08:51:16
有一个范围,如:a001-a200 ,如何分作200条记录插入到表中?我的意思是输入a001-a200 后,表中应该产生两百条记录,分别是a001,a002,a003,a004...a200.
...全文
27 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
humn 2003-09-15
  • 打赏
  • 举报
回复
每APPEND一次,就把关键字自动填入,例如序列号。不就可以了吗?
WWWWA 2003-09-15
  • 打赏
  • 举报
回复
var zz,zz1:string;
begin
for i:=1 to 200 do
begin
case i of
1..9:zz:='00'+inttostr(i);
10..99:zz:='0'+inttostr(i);
100:200:zz:=inttostr(i);
end;
query1.close;
query1.sql.clear;
zz1:='insert into tablename values('+zz+')';
query1.sql.add(zz1);
query1.execsql;
end;
end
humn 2003-09-15
  • 打赏
  • 举报
回复
不停的循环,不停的APPEND啊!

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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