How to display a recordset in a (sub)report in access??

[Twanne]

Hi,

I'm building an aplication and I need to display some fields from a recordset. When try this I only get the last one. I know this has to do with th orde of my code but I don't know how to fix it.

Private Sub Report_Open(Cancel As Integer)
Dim rst As DAO.Recordset
 
    Dim lengte As Integer
    Dim scoreL As Integer
    Dim gewicht As Integer
    Dim scoreW As Integer
    Dim BMI As Integer
    Dim IBW As Integer
 
    Set db = CurrentDb
    Set rst = db.OpenRecordset("SELECT * FROM patParameters WHERE eadnr = " & Form_Testinvoer.eadnr & ";")
 
    volnaam.Caption = Form_Testinvoer.pat & " " & Form_Testinvoer.vpat
    gebDat.Caption = Form_Testinvoer.gebDate
 
    Do Until rst.EOF
        datum = rst.Fields(2)
        leeftijd = age(Form_Testinvoer.gebDate, datum)
        'DoCmd.OpenReport "ZscoreRec", acViewPreview
        rst.MoveNext
    Loop
End Sub

This code is to display the main report that gets its data from a form. In this report I have to display a new recordset (rst). For some reason (probably pure logic) it only displays the last row of the recordset.

Private Sub Report_Open(Cancel As Integer)
    Me.data.Caption = Report_Zscores.datum
    Me.age.Caption = Report_Zscores.leeftijd
End Sub

This to fill the fields in the subreport.

Any help would be usefull

Thanx in advance

Twanne

[nico5038]

For reports you can use the subreport to get "linked" data.
When adding a subform the wizard will propose a link field, just accept that will be sufficient in general.
Your recordset processing loop will indeed loop through all rows and the final one will be the one displayed. For multiple fields you would also need multiple controls on the report....

Nic;o)

[Twanne]

Thanx

But I already solved this problem. Probably some way you said ;)

Greetz
Twanne