我想实现点击按钮后,在表1里添加一条记录(Combo1.Text)
,然后把它取出来放到表2里,可是程序执行完毕只看到表1添加的新纪录,而表2没有看到,部分代码如下,我没有提交吗?
Recordset.AddNew
Recordset.Fields("cjdh").Value = Trim(Combo1.Text)
Recordset.Update Connection.Execute "insert into 表1 cjdh select cjdh  from 表1 where cjdh='" & Trim(Combo1.Text) & "'"