把一张表中的数据导到另一张表中？

[csdnxhb1]

大侠们：
我有两张表jsj1 和1 ，jsj1和1表均有cj字段
我想给jsj1的cj赋值成1的cj，条件是jsj1的准考证号和1的准考证号相同
我这样写是错的为何？
use jsj1
use 1
replace all jsj1.cj with 1.cj for jsj1.zkzh=1.zkzh

[zhonghuashen]

sele jsjl

scan
scatter memvar
update l set cj=m.cj where zkzh=m.zkzh

endscan

[zhonghuashen]

replace all jsj1.cj with 1.cj for jsj1.zkzh=1.zkzh?????行吗

[zhonghuashen]

或者
USE jsjl
scan
update l set cj=jsjl.cj where zkzh=jsjl.zkzh
endscan
行不？？

[csdnxhb1]

好像不行
在命令窗口用scan出现改命令不能在交互方式下运行

[LAIYANGPJ]

没问题，楼上是可以的。

[数据结构与算法学习、智能算法]

sele a
use 1
sele b
use jsj1
replace all cj with a->cj for zkzh=a->zkzh

[十豆三]

把楼上的代码放入一个PRG程序中执行，就可以了。

[shenyegh]

use jsj1
use 1
replace all jsj1.cj with 1.cj for jsj1.zkzh=1.zkzh
上述代码仅打开了1,而jsj1数据库已经被关闭，所以你的第三行代码肯定会出错，你可能试试下列代码：
sele a
use 1
sele b
use jsj1
replace all cj with a->cj for zkzh=a->zkzh

[jim98816]

佩服了，楼上的很精准

[aloneone]

"jsj1的cj赋值成1的cj，条件是jsj1的准考证号和1的准考证号相同":
update 是一SQL语句可以直接用:
update jsjl set jsjl.cj=l.cj where jsjl.zkzh=l.zkzh

[chinacheng07]

use jsj1
replace all jsj1.cj with 1.cj for jsj1.zkzh=1.zkzh
可以了

[dangxuehua]

只能更新一条记录而已

[zjingl]

select 0
use 1
select 0
use jsj1
go top
do while not eof()
select 1
locate for zkzh =jsj1.zkzh
if found()=.t.
replace jsj1.cj with 1.cj
endif
select jsj1
skip
enddo

[zjingl]

笨蛋。
怎能用 1 做表名呢？这样会与数据工作区号相冲突，为何不用其 ABC 做表名呢？

[十豆三]

如果是VFP9，一句搞定:

UPDATE jsj1 SET jsj1.cj=1.cj FROM jsj1,1 WHERE jsj1.zkzh=1.zkzh