读书人

两个命令

发布时间: 2012-03-11 18:15:39 作者: rapoo

求助两个命令
在ADODB查询结果中,1.把记录游标定到第一条记录;
2.让记录游标一条一条的向下移动
谢谢各位了

[解决办法]
Public Sub Test()
Dim strSQL As String
Dim Cnn As New ADODB.Connection
Dim Rst As New ADODB.Recordset

Set Cnn = CurrentProject.Connection

strSQL = "select * from 表名 "
Rst.Open strSQL, Cnn, adOpenKeyset, adLockOptimistic
If Not Rst.EOF Then

'移动到第一条
Rst.MoveFirst

Do While Not Rst.EOF
Debug.Print Rst!字段名

'移动到下一条
Rst.MoveNext
Loop
End If

End Sub

读书人网 >Access

热点推荐