Suppress "Excel format options" dialog when call CRPE

Question

I'm looking at pretty old CRPE dll (written in Nov 1991)l now, to find a way to export excel without "Excel Format Options" dialog.
I have a crystal report and want to export to excel. Before call API function "PEStartPrintJob", want to set up all excel format options and then run the print job without the dialog popping up.
I have CR 9.0 installed on my computer.
Any idea?
Thanks.
Edited by: JasonLi on Jul 16, 2010 4:45 PM

Answer 1

Hi Jason,
Be aware that CR 9 is the last version you are licensed to use crpe32 as your report engine. It's be deprecated. Moving forward you'll have to move to Visual Studio .NET and use the Report Application server as the report engine.
Also be aware that the exporting format changed as of CR 8.5.
Here's the code that should work for you:
          // Export to XLS
          // Initialize members of diskOptions
         memset(&diskOptions, 0, sizeof(UXDDiskOptions));
          diskOptions.structSize = UXDDiskOptionsSize;
          diskOptions.fileName = "c:
tmp
report.xls";
          // PEExportOptions
         memset(&XLSFormatOptions, 0, sizeof(UXFXlsOptions));
          XLSFormatOptions.structSize = UXFXlsOptionsSize;
          XLSFormatOptions.bExportAllPages = true;
          XLSFormatOptions.bUseFormatInDataOnly = true;
          //  Initialize members of XLS format
         memset(&exportOptions, 0, sizeof(PEExportOptions));
          exportOptions.StructSize = PE_SIZEOF_EXPORT_OPTIONS;
          lstrcpy(exportOptions.formatDLLName, "crxf_xls.dll");
          //exportOptions.formatType = UXFXlRecDumpType;  
          exportOptions.formatType = UXFXl97Type;  
          //     Initialize members of Destination Options
          lstrcpy(exportOptions.destinationDLLName, "u2ddisk.dll");
          exportOptions.destinationType = UXDDiskType;
          exportOptions.destinationOptions = &diskOptions;
          exportOptions.formatOptions = &XLSFormatOptions;
          // Start Exporting
          if (!PEExportTo(jobNumber, &exportOptions))
               CString temp;
               temp.Format("Error in PEExportTo %d", PEGetErrorCode(jobNumber));
               AfxMessageBox(temp);
               // Start the job
          if (!PEStartPrintJob(jobNumber,true))
               CString temp;
               temp.Format("Error in PEStartPrintJob %d", PEGetErrorCode(jobNumber));
               AfxMessageBox(temp);