我用的是vf6.0
有两个.dbf文件,表1里有ksh和sfzh(ksh内容为空)，表2也有ksh和sfzh（ksh和sfzh都有），
表1的sfzh和表2的sfzh是一样的(但是顺序不一样)，现在怎么把表2的ksh加到表1的ksh里去(和表1的sfzk对应上)
select 1
for  i=1 to reccount()
go i
select 2
locate for alltrim(sfzh)==alltrim(table1.sfzh)
if found()
replace 1.ksh with 2.ksh
endif
select 1
endfor

我把代码做了一个prg,运行了以后,试了好几次但是表1里的KSH是空的，没有加上

clos tabl
use 表2
SELECT 表2
FOR i=1 TO RECCOUNT()
GO i
qz1=ksh
   UPDATE 表1 SET ksh=qz1 WHERE sfzh=表2.sfzh
ENDF
SELECT 表1
BROWSE

CLOSE TABLES
USE 表2
SCAN
   UPDATE 表1 SET KSH=表2.KSH WHERE 表1.SFZH==表2.SFZH
ENDSCAN
SELECT 表1
BROWSE

谢谢各们师哥