Question

VFP中如何把一个表中的内容复制到另一张表的相同的字段下

如表1中有序号和姓名，表2中有序号和姓名以及其他字段，我要以序号为依据，将表1中的姓名赋给表2中的姓名，怎么样操作呀？

Answer 1

sele 0
use 表1
sele * from 表1 order by 序号 into cursor tmp_表1 &&按序号排序，序号字段最好是数值型字段
****如果序号不是数值型字段，就改成：sele * ,val(序号) as 排序 from 表1 into cursor tmp_表1
sele 0
use 表2
sele 表2
appen from tmp_表1
******如果不需要排序，就省去开头的排序部分
**当然也可以用循环来做，我个人喜欢用SCAN...ENDSCAN来做
sele 0
use 表1
sele * from 表1 order by 序号 into cursor tmp_表1 &&按序号排序，序号字段最好是数值型字段
****如果序号不是数值型字段，就改成：sele * ,val(序号) as 排序 from 表1 into cursor tmp_表1
sele 0
use 表2
sele 表2
sele tmp_表1
scan
sele 表2
appen blan
repl 表2.序号 with tmp_表1.序号,表2.姓名 with tmp_表1.姓名
endscan
**以上的例子是用于表2没有记录的情况，如果表2有数据就不能用上面的代码

Answer 2

use 表1
select 2
use 表2
do while .not. eof()
t=ID3
select 1
replace ID3 with t
skip
select 2
skip
enddo
*******
前提条件：两个表的数据行数一样，且一一对应赋值。