[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 如何将txt、doc文档转换成pdf

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

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

回复 1# 会卖萌的大树


    电脑技术研讨  

TOP

回复 2# 523066680
??还请明示

TOP

这个也许可以,不过我没试过
http://bbs.bathome.net/viewthread.php?tid=16578

TOP

回复 4# CrLf

那里面好像没有把其他文档打印成pdf,只是pdf之间的命令,不过还是谢谢你!

TOP

试试这些
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
复制代码

TOP

盯着这文档看了一晚上,还是搞不明白
http://partners.adobe.com/public ... /sdk/5186AcroJS.pdf

TOP

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

这两天刚好要用 AcroExch.PDDoc,领导要求实现快速检索文件内容,于是开始折腾 pdf 批量转 txt,搜到这个:
http://www.cnblogs.com/panzhilei/archive/2010/10/09/1846806.html

TOP

本帖最后由 会卖萌的大树 于 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
复制代码

TOP

回复 6# CrLf


    我电脑上不能创建acroExch.PDDoc对象,是我的pdf不是专业版本的原因吗?

TOP

回复 10# 会卖萌的大树


安装 acrobat 时会注册 acroExch.PDDoc

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

TOP

返回列表