用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多一次嗎??有什麽其它方法嗎???

解决方案 »

  1.   

    我要根據A表值的變化來查詢B表裏的數據啊!!
    -------------
    什么意思啊,是根据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是这个意思吗