Hi, I want the report to show in Page Width. I can use the crviewer's zoom property and set it to 100 but it does not do exactly what I need. Is there a constant that represents the 'Page Width' option?
Printable View
Hi, I want the report to show in Page Width. I can use the crviewer's zoom property and set it to 100 but it does not do exactly what I need. Is there a constant that represents the 'Page Width' option?
From the help file.
So -Quote:
ZoomLevel
The zoom level to use to view the report As Integer. Indicate a percentage, or use 1 to fit the entire width of the page in the Report Viewer window (but not the entire page) or 2 to fit the entire page in the window.
CRViewer.Zoom 1 'for page width
Hey brucevde long time no see!
MUCHAS GRACIAS AMIGO ! !
I have a problem with the zooming..
VB Code:
Function ViewCrystal(strPath As String) frmMain.crvEnroll.Visible = True strPath = App.Path & "\files\" & strPath 'this is the problem, the change of left & top values works. 'but the zoom does not frmMain.crvEnroll.Top = 60 frmMain.crvEnroll.Left = 4 frmMain.crvEnroll.Zoom 1 Set objCrystalApp = New CRAXDRT.Application Dim objReport As CRAXDRT.Report Set objReport = objCrystalApp.OpenReport(strPath) frmMain.crvEnroll.ReportSource = objReport frmMain.crvEnroll.ViewReport Set objReport = Nothing End Function