A、B两个数据库，均含有姓名、单位、地址、电话四个字段，单位又分为甲、乙、丙、丁等，要求以姓名索引关联2个库，并将B中的单位为甲、乙的地址和电话替换为A的。

[ 本帖最后由 parity 于 2012-6-4 15:52 编辑 ]

VFP9.0代码

CREATE CURSOR AA (姓名 C(10),单位 C(10),地址 C(10),电话 C(13))
FOR I=1 TO 10
    INSERT INTO AA VALUES (REPLICATE(CHR(64+I),10),SUBSTRC("甲丁乙丁丙乙甲丙丁丙",I,1),REPLICATE(CHR(96+I),10),"0432-8546773"+TRANSFORM(I))
ENDFOR
CREATE CURSOR BB (姓名 C(10),单位 C(10),地址 C(10),电话 C(13))
FOR I=1 TO 10
    INSERT INTO BB VALUES (REPLICATE(CHR(64+I),10),SUBSTRC("甲南乙丁丙乙东甲丁丙",I,1),REPLICATE(CHR(106+I),10),"0432-8646879"+TRANSFORM(I))
ENDFOR
UPDATE BB SET 地址=AA.地址,电话=AA.电话 FROM AA WHERE BB.姓名==AA.姓名 AND INLIST(ALLTRIM(BB.单位),"甲","乙")
BROWSE

[ 本帖最后由 sdta 于 2012-6-4 17:04 编辑 ]

非常感谢，我是刚开始自学VFP的，这两天没太琢磨明白，我会继续努力的。再次感谢。

要学VFP就从VFP9.0开始学吧，如果实在有弄不明白的地方，可以到这里求助大家帮助。
上面这段代码UPDATE前面的部分，是为了让你更好的理解，创建了两个数据表，UPDATE命令才是你要的最终结果。通过UPDATE命令，完成了替换操作，比较一下最后的结果，你就可以明白了。

[ 本帖最后由 sdta 于 2012-6-6 10:56 编辑 ]