谢二楼老师。
既然ADO成为趋势,这里我举个例子请教,以便搞清一些概念。
假设窗体内文本框用于输入,有“确认输入”按钮,单击后将数据写到表中。代码如下
Private Sub 命令19_Click()
...
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "订单", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.AddNew
rs("订单号") = Me.订单号
rs("客户") = Me.客户
....
rs.Update
...
End Sub
执行时没问题。
问题是我想同时把某内容写到另一表中,该如何写代码(这里假设想同时把“订单号”写到表“库存进出"的”订单号“字段中),
我是直接加了几句:
rs.Open "库存进出", CurrentProject.Connection, adOpenKeyset, dLockOptimistic
rs.AddNew
rs("订单号") = Me.订单号
.......
rs.Update
可是执行时说对另一个表”....无法进行操作..“,我想这里肯定因我不理解ADO而在基本概念上有问题。
肯请指点迷津。
[此贴子已经被作者于2003-12-31 11:09:12编辑过]
|