我有2个dbf文件，分别命名为a.dbf和b.dbf，在a.dbf文件中有2000条记录，而b.dbf文件中只有1000条记录（该1000条记录是2000条记录中的一部分）。b.dbf文件中有一个xh字段在a.dbf中没有。现在要将b.dbf文件中的xh字段数据按照ksbh一一对应填入a.dbf文件中，而a.dbf文件中其他字段内容不变，总记录条数仍然是2000条而不是3000条。请问这个该如何实现？注：1.ksbh是两个表中共有的字段，具有同一性，而且在各自表中具有唯一性。2.b.dbf文件中的1000条记录是从a.dbf2000条数据中抽出来的，是不连续的数据。这个问题困扰我很长时间了，而且以后经常遇到，请各位不吝赐教！感谢！

*---VFP9代码

USE A AGAIN IN 0 ALIAS A
ALTER TABLE A ADD XH C(5) &&5为B表中XH字段的宽度，暂定为字符型。
UPDATE A SET XH=B.XH FROM B WHERE A.KSBH==B.KSBH

VFP6 代码

USE A AGAIN IN 0
ALTER TABLE A ADD XH C(5) &&5为B表中XH字段的宽度，暂定为字符型。
USE B AGAIN IN 0
SCAN
   UPDATE A SET XH=B.XH WHERE A.KSBH==B.KSBH
ENDSCAN

SQL-SELECT 代码

SELECT A.KSBH,A.字段1,A.字段1,NVL(B.XH,[]) FROM A FULL JOIN B ON A.KSBH==B.KSBH INTO CURSOR TEMP
或
SELECT A.KSBH,A.字段1,A.字段1,NVL(B.XH,[]) FROM A LEFT JOIN B ON A.KSBH==B.KSBH INTO CURSOR TEMP

[ 本帖最后由 sdta 于 2013-1-31 01:01 编辑 ]

SELECT 1
USE a
SELECT 2
USE b
FOR I=1 TO RECCOUNT()
    GO I
    SELECT a
    REPLACE xh WITH b.xh FOR ksbh=b.ksbh
    SELECT b
ENDFOR

看看

SELECT 1

 USE a
  INDEX ON ksbh TO ksbh
SELECT 2

 USE b

 GO TOP

 DO whil NOT EOF()
  mksbh=ksbh
  mxh=xh
  SELECT 1
   SEEK mksbh
   IF NOT EOF()
    REPLACE xh WITH mxh
   ENDIF
  SELECT 2

 SKIP
ENDDO 

谢谢版主大力相助!可是总是在vfp6版本里显示‘嵌套错误’呢？

[ 本帖最后由 shyoow 于 2013-1-31 20:20 编辑 ]

谢谢!版主您的程序输入后也显示嵌套错误,不知道什么原因!

谢谢你的热心解答!可是显示'交互方式下不能使用此语句'