用Recordset可以同時操作ACESS數據庫裏的幾個表嗎??
例如
macSQL = "select * from MachineTool"
myRecord.Open macSQL, , adOpenDynamic, adLockOptimistic
這樣我只能操作MachineTool這個表!
當我想操作其它表時,就只能用嗎??
myRecord.close
macSQL = "select * from ToolTip"
myRecord.Open macSQL, , adOpenDynamic, adLockOptimistic然後要操作回MachineTool表時又得現open多一次嗎??有什麽其它方法嗎???
例如
macSQL = "select * from MachineTool"
myRecord.Open macSQL, , adOpenDynamic, adLockOptimistic
這樣我只能操作MachineTool這個表!
當我想操作其它表時,就只能用嗎??
myRecord.close
macSQL = "select * from ToolTip"
myRecord.Open macSQL, , adOpenDynamic, adLockOptimistic然後要操作回MachineTool表時又得現open多一次嗎??有什麽其它方法嗎???
-------------
什么意思啊,是根据Recordset 当前值的变化查询B表的数据吗?
用什么字段关联啊,(假如是CommField)macSQL = "select * from MachineTool"
rs1.Open macSQL, , adOpenDynamic, adLockOptimisticmacSQL = "select * from ToolTip Where ToolTip.CommField='" & rs1("CommField") & "'"
rs2.Open macSQL, , adOpenDynamic, adLockOptimistic如果A表用rs1打开,而且与DataGrid1绑定,
如果B表用rs2打开,而且与DataGrid2绑定,在 Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Dim bk1 As String
Dim bk2 As String
On Error Resume Next
If IsNull(LastRow) Then
bk1 = ""
Else
bk1 = LastRow
End If
bk2 = DataGrid1.Book
If bk1 <> bk2 Then
rs2.Requery
End If
End Sub是这个意思吗