8 — Crystal Reports

' Set parameters (CR8 uses ParameterFields collection) rpt.ParameterFields.GetItemByName("pStartDate").AddCurrentValue = CDate("2025-01-01") rpt.ParameterFields.GetItemByName("pEndDate").AddCurrentValue = CDate("2025-12-31")

Windows XP SP3 (32-bit) with MDAC 2.8. Have a CR8 trick or horror story? Leave a comment below. crystal reports 8

Set rpt = Nothing Set app = Nothing

' Export to PDF rpt.ExportOptions.DestinationType = crEDTDiskFile rpt.ExportOptions.FormatType = crEFTPortableDocFormat rpt.ExportOptions.DiskFileName = "C:\output.pdf" rpt.Export False ' False = suppress print dialog ' Set parameters (CR8 uses ParameterFields collection) rpt