同上 ,只复制一个字段里的值,‘姓名’不用复制
表一(aa) 表二(bb)
姓名 姓名
张三 复制后 张三
李四 李四
王五 王五
表一(aa) 表二(bb)
姓名 姓名
张三 复制后 张三
李四 李四
王五 王五
解决方案 »
- 批处理文件的调用
- 做三层程序多了,垃圾服务也多了,请问怎么清除啊?
- 怎么获得网上邻居的计算机名
- 100分求可以高速下载的windows2000的地址。。。
- 如何在combobox里选择表里的列名?
- 征求快速算法
- form2.show;form1.close;为什么form1.close;语句就不执行了??
- 阿劳,阿弟,快点来帮帮忙!!
- 高分求救,求的字符的UNICODE码的函数!
- 我的哥们在吗?偶的win2000p打不开记事本了,说缺少prontpg文件,谁能邮寄一个给偶,多谢(如果哪个文件不大的话)/牛虻
- 想多交些开发人员做朋友,共同讨论问题,一起进步!
- 关于三层应用系统的发布问题,我愿倾家荡产都可以!
select 姓名 from aa一个AdoQuery即可
他说了:'姓名’不用复制你的写法肯定不行
?
什么意思呀?不明白,用insert into bb (姓名)
select 姓名 from aa
不行嘛?
我理解“姓名”是字段名
我估计可能是
表一(aa) 表二(bb)
> 姓名 姓名
张三 张三
李四 李四
王五 王五
> 姓名 姓名
张1 复制后 张三
李2 李四
王3 王五
最好请楼主说清楚
procedure copyData()
var
aquery, bquery: tadoquery
begin
aquery := tadoquery.create(nil);
设置aquery参数
bquery := tadoquery.create(nil);
设置bquery参数
对aquery和bquery执行查询
while not aquery.eof do
begin
读出姓名值
写到bquery中
bquery.next
aquery.next
end;
end;
这样可以吗?
bquery.free;
aquery.free;
具体代码自己完成。
insert into bb (姓名)
select 姓名 from aa有什么问题么?
procedure copy()
begin
with adoquery1 do
begin
close;
adoquery1.sql.text:='select 姓名 from aa'
open;
end;
while not eof do
begin
with bb do
begin
append;
fieldbyname('姓名').asstring:=adoquery1.fieldbyname('姓名').assting;
post;
end;
end;
end;
2.你也可以在输入姓名是将姓名同时输入两个表中!