導航:首頁 > 文檔加密 > windowsformspdf

windowsformspdf

發布時間:2024-07-20 06:36:26

㈠ vb.net 導出pdf

利用DataWindow.net在 vb.net 下導出PDF格式文件
利用datawindow.net,導出PDF文件,實現前提:
1.安裝Acrobat Distiller虛擬列印機,注意要用datawindow.net提供的列印驅動,在c:\program files\sybase\datawindow.net2.0\driver中,在文章最後,我會提供一個靜態安裝虛擬列印機的批處理文件,方便安裝。
2.安裝Ghostscript 7.05 ,在網上找,免費的。
3.導出PDF文件前,一要指定虛擬列印機名,其次導出格式為PDF(Export.PDF.Method=Distill!),另外還要指定 PDF.Distill.CustomPostScript=Yes。
具體代碼如下:
''' <summary>
''' 導出文件
''' </summary>
''' <param name="sender"></param>
''' <param name="e"></param>
''' <remarks></remarks>
Private Sub btnExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExport.Click
Try
Dim strFilename, strPrinter As String
Dim saveDg As New SaveFileDialog
strPrinter = Me.dwPrint.Describe("DataWindow.Print.PrinterName")
saveDg.FileName = Me.dwPrint.Tag.ToString
saveDg.Filter = "Pdf文件|*.pdf|Excel文件|*.xls|所有文件|*.*"
If saveDg.ShowDialog = Windows.Forms.DialogResult.OK Then
strFilename = saveDg.FileName
If strFilename.IndexOf(".pdf") > 0 Then
Me.dwPrint.Modify("DataWindow.Print.PrinterName='Acrobat Distiller'")
Me.dwPrint.Modify("DataWindow.Export.PDF.Method=Distill!")
Me.dwPrint.Modify("DataWindow.Export.PDF.Distill.CustomPostScript=Yes")
Me.dwPrint.SaveAs(strFilename, Sybase.DataWindow.FileSaveAsType.Pdf, True)
ElseIf strFilename.IndexOf(".xls") > 0 Then
Me.dwPrint.SaveAs(strFilename, Sybase.DataWindow.FileSaveAsType.Excel, True)
End If
Me.dwPrint.Modify("DataWindow.Print.PrinterName='" + strPrinter + "'")
MessageBox.Show("導出成功!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
Catch ex As Exception
MessageBox.Show(ex.Message, "提示", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End Sub

4 批處理文件(實現靜默安裝)

閱讀全文

與windowsformspdf相關的資料

熱點內容
中國銀行app賬號怎麼登錄 瀏覽:862
安卓手機icloud雲伺服器地址 瀏覽:796
加密門禁如何寫到小米手機 瀏覽:164
java靜態方法的多線程 瀏覽:260
CAXAXp下載打不開要加密 瀏覽:239
開鎖pdf 瀏覽:84
python可視化奶茶 瀏覽:219
命令方字幕 瀏覽:591
蘋果手機如何連接ipad伺服器 瀏覽:976
列印矩陣java 瀏覽:394
如何雙開一個不能雙開的app 瀏覽:529
抖音喜歡加密了怎麼打開 瀏覽:386
mysql命令行顯示表 瀏覽:364
國防離我們源碼200字 瀏覽:778
vmwaretoolslinux 瀏覽:94
命令方塊生存放不了嗎 瀏覽:700
程序員入門很難嗎 瀏覽:103
70後程序員照片 瀏覽:194
一個普通程序員能幹多久 瀏覽:936
adobe的PDF轉換器 瀏覽:863