Question

vb中怎样将access数据库一张表中的一个字段复制到另一张表中

access数据库data.mdb的表1中有三个字段（X,Y,Z）表2中也有三个字段（X，Y，Z）但是表2中的Z字段是空的没有值（X，Y都有值），现在想将表1中的Z列的值赋给表2的Z列，想使用update来实现
下面是我写的一段代码，但总是提示错误
Dim cn As New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data.mdb
cn.Execute "update 表2 set Z = select Z from 表1
运行后总是提示“语法错误。在查询表达式 'select Z from 表1'中”，请各位帮帮忙， 看看这句话是什么原因错了，要是有什么好建议可以达到目的也请告诉小弟一声。
update后面跟select语句到底该怎么写啊？

Answer 1

update a set a.aa =b.bb
select * from a ,b
where a.c=b.c

试试上面这个。

如果不行的话，建议查查T-SQL表

下面有一个实例，我也没时间看，不过估计是可以解决你的问题的。
http://wenda.tianya.cn/wenda/thread?tid=3883b441f20d1e8c&clk=wttpcts

Answer 2

cn.Execute "update 11 set " & jj1 & " = (select " & jj1 & " From " & ii1 & " where 11.X = " & ii1 & ".X)"
试试看，不行留言给我。

Answer 3

是不是少了个双引号啊？