[求助]控件更新问题

loren

Private Sub 总成零件号_AfterUpdate()
Dim R As Integer

      Set rs2 = New ADODB.Recordset
      rs2.Open "一级生成表", CurrentProject.Connection, adOpenKeyset, adLockOptimistic----这句是抄的,不是很懂.
      rs2.MoveFirst
      For R = 1 To rs2.RecordCount
      
          rs2("总成代码") = Me.总成零件号
          rs2.MoveNext
      Next R
     'rs2.Close "一级生成表"------这句有问题.
     Me.Requery

End Sub

以上代码想实现,控件"总成零件号"更新后,将表"一级总成表"的字段("总成代码") 随之更新,但如何在更新后,解除"一级总成表"的引用啊.请高手指教.

老鬼

rs2.Close后面加了"一级生成表"是什么意思？

andymark

rs2.Close