Recordset for Reports

[Chinde]

Hi

I'm trying to setup a simple recordset to capture information in a table to place it in a report. Here's the code:

Private Sub Report_Load()
 
    Dim rsOne As Recordset
    Dim SQL As String
 
    SQL = "SELECT * FROM tblTest ;"
 
    Set rsOne = CurrentDb.OpenRecordset(SQL)
 
    Debug.Print (rsOne.RecordCount)
 
End Sub

I know that tblTest has 2 record in it. the debug.print only returns 1 record.

I want to use unbound text boxes on the report and I want to populate the boxes via VBA, the main reason for VBA is I am most comfortable with VBA.

I haven't really tried this before so I'm happy to believe that I'm making some fundamental error in my logic.

Using Access 2007, on xp.

[ChipR]

I think to get the true RecordCount, insert in line 9:

  rsOne.MoveLast

[ChipR]

Yeah, just for reference: Recordset.RecordCount Property

"The RecordCount property doesn't indicate how many records are contained in a dynaset–, snapshot–, or forward–only–type Recordset object until all records have been accessed. Once the last record has been accessed, the RecordCount property indicates the total number of undeleted records in the Recordset or TableDef object."

[Chinde]

ha I feel so stupid.

Thanks