Mega Code Archive

 

Categories / VisualBasic Script / Access

 

Move cursor in a Recordset with MoveNext

Sub PropNulls()     Dim rst As ADODB.Recordset     Set rst = New ADODB.Recordset     rst.Open "Employees", CurrentProject.Connection     Do Until rst.EOF         Debug.Print rst!EmployeeID, rst!Region         rst.MoveNext     Loop End Sub