Question

在VFP中如何将两个含有相同数据结构的表中的其中某个字段的值复制到另一个表中？

如表1有字段：ID1、DI2、ID3
表2有字段：ID1、ID2、ID3
现在要把表2中ID3的值复制到表1中的ID3中，如何实现！？谢谢了！
如表1有字段：ID1、DI2、ID3
表2有相同的字段：ID1、ID2、ID3
现在要把表2中ID3的值复制到表1中的ID3中，如何实现！？谢谢了！
具体怎样操作，谢谢了！？

Answer 1

1、如果可能有记录相同就麻烦一点，如果记录都不相同的话，直接追加数据就是了。
直接在表一追加，也可以新建表追加。存在相同的记录，就需要先查找。

思路如下：
三个表都要先进行索引，使用相同的关键字段（假设为KEY）对三个表索上。

在几个不同的工作区分别打开三个表。表一在A区（1区），表二为B，表三为C

选B区（SELE B），加个循环或扫描处理（SCAN）

选A（SELE A），在A中查找B的字段 SEEK B.KEY 或者 SEEK B->KEY（或者用FIND）

判断，如果找到就不处理了。
如果没有找到，追加空记录APPE BLAN
以B的内容替换A新增记录的数据，REPL XXX WITH B.XXX YYYY WITH B.YYYY

C区数据一样处理。

这样所有数据均追加到A区（表一）中。

2、这是很简单的统计，使用COUNT
数据库中的日期转字符，提取年份数据,不知道你的日期格式是什么，假设是yyyy/mm/dd。

COUNT FOR SUBS（DTOC（日期),1，4）=“1990” to DDDD
？ DDDD

统计团员一样的
COUNT FOR 政治面貌 = "团员" to kkkk
? kkkk

Answer 2

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