- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 请问如何用代码打印PDF文件 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=137049)
-- 发布时间：2019/6/27 9:16:00
-- 请问如何用代码打印PDF文件
我有1000多个PDF文档需要用代码自定义打印请问哪位老兄有办法
-- 发布时间：2019/6/27 10:41:00
--
-- 发布时间：2019/6/27 11:02:00
--
无法直接打印pdf，pdf转图片参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77213&skin=0
-- 发布时间：2019/6/27 11:06:00
--
或者
Dim Proc As New Process
Proc.File = "d:\\test.pdf"
Proc.Verb = "Print" \'指定动作
Proc.Start()
-- 发布时间：2019/6/27 16:39:00
--
//创建PdfDocument类的对象，并加载PDF文档 PdfDocument doc = new PdfDocument(); doc.LoadFromFile("Test.pdf"); //使用默认打印机打印文档所有页面 doc.Print();
-- 发布时间：2019/6/27 16:42:00
--
引用这个 不知为啥打印不出来 Spire.Pdf.dll
.
For Each r As Row In Tables("认定审批2").Rows
Dim pdf As PdfDocument = New PdfDocument("E:\\申请目录2\\15649\\" & r("报名号").ToString & ".pdf")
pdf.PrintDocument.Print()
Next
-- 发布时间：2019/6/27 16:44:00
--
此主题相关图片如下：捕获.jpg
-- 发布时间：2019/6/27 16:46:00
--
For Each r As Row In Tables("认定审批").Rows
Dim pdf As pdf.PdfDocument = New pdf.PdfDocument("E:\\申请目录2\\15649\\" & r("报名号").ToString & ".pdf")
pdf.PrintDocument.Print()
Next
-- 发布时间：2019/6/27 18:40:00
--
mark 打印pdf
引用dll
| 下载信息 [文件大小：395.1 KB 下载次数：41] | |
 点击浏览该文件:o2s.components.pdfrender4net.zip |
执行代码
Dim pdfFile = O2S.Components.PDFRender4NET.PDFFile.Open("d:\\test.pdf")
Dim ps As new System.Drawing.Printing.PrinterSettings
Dim pdfPrintSettings As new O2S.Components.PDFRender4NET.Printing.PDFPrintSettings(ps)
pdffile.print(pdfPrintSettings)
pdffile.dispose