请教将bb.dbf中字段dw里面的内容复制到aa.dbf中字段kzx2，如何用下面程序不行！[有附件]

请问将bb.dbf中字段dw里面的内容复制到aa.dbf中字段kzx2，怎么用下面程序不行！[有附件]
请问将bb.dbf中字段dw里面的内容复制到aa.dbf中字段kzx2，怎么用下面程序不行！

请下载附件运行：
http://up1.zol.com.cn/bbs_upload/upload/2007/05_16/117930008411.rar


close   all
use   bb   in   0
select     bb
go   top
do   while   not   eof()
update   aa   set   kzx2=bb.dw   where   right(attr(ksh),9)=right(attr(bb.xh),9)
skip
enddo

麻烦做好后把源程序发到greatlycool@163.com，谢谢！

------解决方案--------------------
attr-> allt