To explain what I am doing. I have a report that runs form this query
Code:
rs.Open ("SHAPE{SELECT Machine, UserID, [Software Title], Version, Department," & _
            "[Assigned Date], Server FROM [MS Office Licenses] WHERE " & s & "  and " & _
            "UserID NOT LIKE '--%' ORDER BY [" & CmbOrderby1.Text & "], [" & CmbOrderby2.Text & "]}" & _
            " AS SQL1 " & _
            "COMPUTE count(SQL1.Department) AS DeptCount,SQL1 BY Department"), Cn, adOpenStatic, adLockOptimistic
          
            'Update fields and datareport control names to those you use
            'Set datasource and bind recordset fields.
            Set rpt.DataSource = rs
                       
            rpt.Sections("Section1").Controls("Text8").DataField = "DeptCount"
            With rpt.Sections("SQL_Detail")
               
                .Controls("Text1").DataField = "UserID"    'where quantity is a field in the recordset
                .Controls("Text1").DataMember = "SQL1"
                .Controls("Text2").DataField = "Software Title"
                .Controls("Text2").DataMember = "SQL1"
                .Controls("Text3").DataField = "Version"
                .Controls("Text3").DataMember = "SQL1"
                .Controls("Text4").DataField = "Department"
                .Controls("Text4").DataMember = "SQL1"
                .Controls("Text5").DataField = "Server"
                .Controls("Text5").DataMember = "SQL1"
                .Controls("Text6").DataField = "Assigned Date"
                .Controls("Text6").DataMember = "SQL1"
                .Controls("Text7").DataField = "Machine"
                .Controls("Text7").DataMember = "SQL1"               
            
            End With
           
            rpt.Sections("Section1").Controls("Label17").Caption = area            
            rpt.Show vbModal
    
            Unload rpt
            Call DBDisconnect
            Set rpt = Nothing            
            Exit Sub
That then go to a report. But on the report it shows an extra page that is blank. I am using group headers if that makes a difference. I do have rptPageBreakNone set. Lets say it has 3 pages, the second page is half filled yet I still have a blank 3rd page. Anybody know why?