Board logo

标题: [文本处理] 如何将txt、doc文档转换成pdf [打印本页]

作者: 会卖萌的大树    时间: 2014-8-26 13:09     标题: 如何将txt、doc文档转换成pdf

本帖最后由 pcl_test 于 2016-9-9 14:45 编辑

我想用虚拟打印机把给的一个文档比如txt,doc打印成pdf,就像word里面提供的那种打印功能,而当我直接print a.txt时,显示无法初始化PRN,请问怎么初始化打印设备?
作者: 523066680    时间: 2014-8-26 13:57

回复 1# 会卖萌的大树


    电脑技术研讨  
作者: 会卖萌的大树    时间: 2014-8-26 14:06

回复 2# 523066680
??还请明示
作者: CrLf    时间: 2014-8-26 14:51

这个也许可以,不过我没试过
http://bbs.bathome.net/viewthread.php?tid=16578
作者: 会卖萌的大树    时间: 2014-8-26 21:00

回复 4# CrLf

那里面好像没有把其他文档打印成pdf,只是pdf之间的命令,不过还是谢谢你!
作者: CrLf    时间: 2014-8-26 23:55

试试这些
http://www.oschina.net/p/poppler/
http://www.docin.com/p-586462860.html
话说搜到还可以使用 acrobat 的 com 组件,貌似是个可行的方向,不过用 tli 和 powershell 都没能看到这个 com 组件有什么方法和属性
http://bettysmu.blog.163.com/blog/static/1311891220086143444151
试了试不知道怎么从 txt 生成 pdf:
  1. Set pdf = CreateObject("AcroExch.PDDoc")
  2. pdf.Open "d:\a.txt"
  3. '测试打开 pdf 是可以的
  4. pdf.Save 1,"d:\a.pdf"
  5. pdf.Close
复制代码

作者: CrLf    时间: 2014-8-26 23:58

盯着这文档看了一晚上,还是搞不明白
http://partners.adobe.com/public ... /sdk/5186AcroJS.pdf
作者: CrLf    时间: 2014-8-28 02:08

本帖最后由 CrLf 于 2014-8-28 02:10 编辑

这两天刚好要用 AcroExch.PDDoc,领导要求实现快速检索文件内容,于是开始折腾 pdf 批量转 txt,搜到这个:
http://www.cnblogs.com/panzhilei/archive/2010/10/09/1846806.html
作者: 会卖萌的大树    时间: 2014-8-29 19:31

本帖最后由 会卖萌的大树 于 2014-8-31 08:49 编辑

查找了半天,自己写了这个,目前就只能把word转化为pdf,利用是word的另存为功能在接着试其他类型的文档
  1. On Error Resume Next
  2. If WScript.Arguments.Count = 0 Then
  3. WScript.Echo "Usage :print2Pdf docPath pdfPath"
  4. WScript.Quit
  5. Else
  6. Dim oWord,objFile,docPath,pdfPath
  7. docPath = WScript.Arguments.Item(0)
  8. pdfPath = WScript.Arguments.Item(1)
  9. Set oWord = CreateObject("word.application")
  10. oWord.Visible=false
  11. Set objFile=oWord.Documents.open(docPath)
  12. objFile.SaveAs2 pdfPath,17
  13. objFile.Close
  14. oWord.Quit
  15. End If
复制代码

作者: 会卖萌的大树    时间: 2014-8-29 19:33

回复 6# CrLf


    我电脑上不能创建acroExch.PDDoc对象,是我的pdf不是专业版本的原因吗?
作者: CrLf    时间: 2014-8-29 20:00

回复 10# 会卖萌的大树


安装 acrobat 时会注册 acroExch.PDDoc

word 是个好想法,资料多,实现起来容易...
open 支持 txt 吧:
http://blog.sina.com.cn/s/blog_54b0c0ab0100h975.html




欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2