
Win32::OLE::CrystalRuntime::Application - Perl Interface to the CrystalRuntime.Application OLE Object

The ASP Version
Dim oApp, oRpt
Set oApp = Server.CreateObject("CrystalRuntime.Application")
Set oRpt = oApp.OpenReport(vFilenameReport, 1)
oRpt.DisplayProgressDialog = False
oRpt.MorePrintEngineErrorMessages = False
oRpt.EnableParameterPrompting = False
oRpt.DiscardSavedData
oRpt.ExportOptions.DiskFileName = vFilenameExport
oRpt.ExportOptions.FormatType = 31 '31=>PDF
oRpt.ExportOptions.DestinationType = 1 '1=>filesystem
oRpt.ExportOptions.PDFExportAllPages = True
oRpt.Export(False)
Set oRpt = Nothing
Set oApp = Nothing
The perl Version
use Win32::OLE::CrystalRuntime::Application; my $application=Win32::OLE::CrystalRuntime::Application->new; my $report=$application->report(filename=>$filename); $report->export(type=>"pdf", filename=>"export.pdf");



my $application=Win32::OLE::CrystalRuntime::Application->new();

Sets or returns the Program ID which defaults to "CrystalRuntime.Application". You may want to specify the version if you have multiple objects in your environment.
$application->ProgramID("CrystalRuntime.Application.11"); #Requires version 11
OR
my $application=Win32::OLE::CrystalRuntime::Application->new(ProgramID=>"CrystalRuntime.Application.11");
Set or Returns the OLE Application object. This object is a Win32::OLE object that was created with a Program ID of "CrystalRuntime.Application.11"
Returns a report object.



Michael R. Davis
CPAN ID: MRDVT
STOP, LLC
domain=>stopllc,tld=>com,account=>mdavis
http://www.stopllc.com/

This program is free software licensed under the...
The BSD License
The full text of the license can be found in the LICENSE file included with this module.

Crystal Reports XI Technical Reference Guide - http://support.businessobjects.com/documentation/product_guides/boexi/en/crxi_Techref_en.pdf