Forcing FormatCount On Unbound Reports?

Hi folks, I'm having a problem creating a report.

I've gotten rid of all the linked tables from my frontend, so I'm fetching all my data from the backend with VBA code.

This works splendidly until I got to creating reports!

I can populate the report detail with the below code, by opening a recordset and filling in the appropriate text boxes when the report calls the Format_Detail subroutine, but the problem is, that opening a report with no recordsource sets the FormatCount property to 0, so it only runs through the format_detail once. Setting the .nextrecord to FALSE allows as many sub calls as I need, but I can't figure out how to force the report to generate a new detail line! It's looping through all the records in the recordset, but it's only generating one line on the report

Any ideas?




Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next



If tags.EOF = True Then




[txtfound] = tags.RecordCount
tags.Close
Set tags = Nothing
Me.nextrecord = True
Exit Sub

Else

[txtCode] = tags!TagCode
[txtDescription] = tags!Description
[txtCount] = tags!Countoftagcode
tags.MoveNext
Me.nextrecord = tags.EOF

'something to force new line here?
'
'
'
'


End If



End Sub





Private Sub Report_Open(Cancel As Integer)




Set tags = backend.OpenRecordset("SELECT Tags.TagCode, Codes.Description, Count(Tags.TagCode) AS CountOfTagCode FROM Codes INNER JOIN Tags ON Codes.Code = Tags.TagCode GROUP BY Tags.TagCode, Codes.Description")

tags.MoveFirst


End Sub