ACCESS中，使用RS打开表，也需要CONN，连接数据源？

WINYZY

我只用过VB，对ACCSSCE VBA不是太熟悉啊，想实现对一个表中每条数据，进行计算整理后加入另外一个表，我想肯定是RS打开表后，进行RS.MOVENEXT,一条条计算，不知是否是这样?VBA中也需要CONN连数据源吗？如何写？

WINYZY

很感谢，最近在学ACCESS VBA，没有一本深入的书，哎。。好烦...

todaynew

Dim rs As New ADODB.Recordset
Dim sql As String
Dim i As Long
sql = "sql语句"
rs.Open sql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
语句块
For i = 1 To rs.RecordCount
        rs（“字段1”）=表达式1
        rs（“字段2”）=表达式2
        。。。。
        rs.MoveNext
Next
语句块
rs.Close
End Sub