Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Null rpt.PrtMip and rpt.PrtDevMode woes...

0 views
Skip to first unread message

Dana Mansolillo

unread,
Sep 13, 2002, 1:19:17 PM9/13/02
to
rpt.PrtMip and rpt.PrtDevMode are coming up as null so the
code that would ordinarily be used to set page orientation
and margins is completely ignored.

If Not IsNull(rpt.PrtDevMode) Then
strDevModeExtra = rpt.PrtDevMode
DevString.RGB = strDevModeExtra
LSet DM = DevString
DM.lngFields = DM.lngFields Or
DM.intOrientation 'Initialize fields.
DM.intPaperSize = iSize 'Letter size
DM.intOrientation = iOrientation 'Landscape
LSet DevString = DM 'Update property.
Mid(strDevModeExtra, 1, 94) = DevString.RGB
rpt.PrtDevMode = strDevModeExtra
End if

Full code attached.

Thanks in advance!

Dana

ReportCode.txt
0 new messages