Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

crviewer report no display

Status
Not open for further replies.

jayfox

Programmer
Dec 19, 2002
29
0
0
US
When I run this I do not get errors but no report displays either. Also if I choose a report that requires a paramter then the parameter screen will display but when I hit OK the report again does not display...I can't figure this out. Any help would be great.
Here is my code:
Dim crysApp As New craxdrt.Application
Dim selectedreport As String
Dim myRpt As craxdrt.Report
selectedreport = "\\Cmnt2\depot\CCRPoms\project\visbasic\test.rpt"
Set myRpt = crysApp.OpenReport(selectedreport)


CRViewer1.ReportSource = myRpt
CRViewer1.ViewReport
 
Try using this event
Code:
Private Sub myRpt_NoData(pCancel As Boolean)
    MsgBox "There is no data for this report", vbInformation, "No Data"
End Sub
Just to be sure that there's something to display in the report.
 
myRpt.DiscardSavedData 'Add this line
CRViewer1.ReportSource = myRpt 'Before this line




Two strings walk into a bar. The first string says to the bartender: 'Bartender, I'll have a beer. u.5n$x5t?*&4ru!2[sACC~ErJ'. The second string says: 'Pardon my friend, he isn't NULL terminated'.
 
Damn! I thought that would work but it didn't.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top