2009-08-31 50 views
4

使用VB 6和Crystal Report 8.5如何導出到Crystal Report中的PDF文件?

在生成報告的客戶端系統中,我在報告中單擊了導出到PDF按鈕;它顯示出口,出口選項。選擇導出文件不顯示在客戶端系統中。

但在我的系統,它顯示它顯示導出,導出選項。選擇導出文件。但在客戶端系統中未顯示選擇導出文件屏幕。

我能不能保存報告文件中的PDF文件。因爲它沒有要求保存文件名。

任何一個可以幫助解決這個問題?

回答

3

嘗試,

Private Sub ExportReportToPDF(ReportObject As CRAXDRT.Report, Byval FileName As String, Byval ReportTitle As String) 
    Dim objExportOptions As CRAXDRT.ExportOptions 
    ReportObject.ReportTitle = ReportTitle 
    With ReportObject 
     .EnableParameterPrompting = False 
     .MorePrintEngineErrorMessages = True 
    End With 

    Set objExportOptions = ReportObject.ExportOptions 
    With objExportOptions 
     .DestinationType = crEDTDiskFile 
     .DiskFileName = FileName 
     .FormatType = crEFTPortableDocFormat 
     .PDFExportAllPages = True 
    End With 

    ReportObject.Export False 

End Sub 

Private Sub Command1_Click() 
     Dim objCrystal As CRAXDRT.Application 
     Dim objReport As CRAXDRT.Report 

     Set objCrystal = New CRAXDRT.Application 
     Set objReport = objCrystal.OpenReport(ReportFileName, 1) 

     ExportReportToPDF objReport, "c:\foo\foo.pdf", "foo" 
End Sub 
+1

在我的系統,是問一個文件名保存,但在客戶端系統是不是要求一個文件名保存? – Gopal 2009-08-31 09:22:22

+1

@adatapost - 在Crystal Report 8.5中已經內置導出PDF功能,爲什麼我需要編寫導出爲PDF的代碼。在我的系統中正在創建一個文件名來保存。但在客戶端系統導出PDF屏幕正在顯示,但它不要求文件名保存。 – Gopal 2009-08-31 09:49:57

+1

@Gopal - 我們每天在客戶端系統上導出爲PDF格式。我們提示我們的用戶輸入文件名,並在上面的導出選項中設置文件名。它應該只是工作。 – 2009-09-05 01:38:17

0

這聽起來像水晶文件的部署問題。檢查用戶在他們的機器上有一個名爲u2ddisk.dll的文件 - Crystal 8.5需要該文件才能導出到文件。否則,它會選擇「導出到應用程序」選項。 「導出格式」和「導出目標」下拉列表中項目的可用性取決於當前存在的dll,聽起來您缺少「目標」下拉列表中的「導出到磁盤」。

1

1)安裝水晶報表.. 2)複製crxf_pdf.dll從C複製:\ WINDOWS \水晶C:\ WINDOWS \ SYSTEM32裏面夾... 3)然後問題就解決了..

1

在我情況下,在Windows 8.1 x64上,該解決方案是:

  1. 定位,在開發計算機上的文件夾%PROGRAMFILES%\希捷 SOFTWARE \共享
  2. 副本crtslv.dll和ExportModeller.dll從 dev機器到th ËC:\ WINDOWS \ Syswow64資料\文件夾

  3. 打開一個命令提示符具有管理員的權限

  4. 寄存器都crtslv.dll和ExportModeller.dll與regsrv32
  5. 重試PDF導出...

就是這樣。

相關問題