Thank you for your reply.The source is as follows:


The report file name is set in the form load event

rptSingleThreat.ReportFileName = strDataPath & "\Threat.rpt"


Private Sub cmdPrint_Click()
rptSingleThreat.ParameterFields(1) = "pThreat;" & Trim(Str(adoThreatDetail!PK_Threat)) & ";True"

'MsgBox "hello", vbOKOnly

rptSingleThreat.Action = 1
End Sub


Without the message box the report displays blank screen and it seems that it is looking for the data. When I click on the pause button after a few clicks it just displays the labels on the report without any data.
If I add the msgbox, then the report is displayed correctly.


Thanks in advance,
Bianca