批量转PDF文件

oyxx1023 · 发表于 2013-7-11 11:32:37

搜索了一下论坛，所有的批量打印程序，在批量打印成PDF文件的时候都要逐一输入PDF文件名，能有什么办法解决这一不足吗？
比如模型空间中有100张规则排列的A3图，要以CAD文件名+序号的方式生成PDF文件。逐一输入文件名批量打印就没什么优势了
（command "plot"）、vla-plottodevice貌似都不行

lijiao · 发表于 2015-7-22 09:13:31

前提，系统里要有acrobat软件

(defun cs-hb-pdf (filename filename1 / OBJLAST OBJTHIS)

  (setq objLast (vlax-get-or-create-object "acroExch.PDDoc"))
  (setq objThis (vlax-get-or-create-object "acroExch.PDDoc"))
  (vlax-invoke-method objLast 'Open filename)
  (vlax-invoke-method objThis 'Open filename1)
  (setq toto (1- (vlax-invoke-method objLast 'GetNumPages)))
  (vlax-invoke-method objLast 'InsertPages toto objThis 0 1 0)
  (vlax-invoke-method objThis 'Close)
  (vlax-invoke-method objLast 'Save 1 filename)
  (vlax-invoke-method objLast 'Close)
  (vlax-release-object objThis)
  (vlax-release-object objLast)
  (vl-file-delete filename1)
  (princ)
)

vitalgg · 发表于 2021-11-25 04:23:17

http://atlisp.cn/package-info/pdftk-stable.html
基于 pdftk free 的PDF处理工具。用于 PDF 合并，拆分，加密，解密，加水印，戳记等。pdftk 详情见 pdftk.com

如果无法播放，请点击此处在新窗口打开

sysu-沼泽 · 发表于 2021-12-14 08:55:12

lijiao 发表于 2015-7-22 09:13
前提，系统里要有acrobat软件

(defun cs-hb-pdf (filename filename1 / OBJLAST OBJTHIS)

您好~请问，如果是福昕pdf编辑器，代码需要如何调整才能运行呢，感谢！

Gu_xl · 发表于 2013-7-11 12:30:05

控制面板里设置一下PDF打印机如下图：

每次打印完成后将默认保存的pdf文件改名后继续打印即可！

叮咚 · 发表于 2013-7-11 12:30:20

用pdf factory

gtj116600 · 发表于 2013-7-11 14:10:37

批量打印帖子

oyxx1023 · 发表于 2013-7-11 17:08:36

To Gu_xl:
我的意思是用LISP程序批量打印成PDF文件啊（模型空间里的多个A3图，命名以1，2，3..，.pdf），打印成PDF的时候不是每次都要求输入文件名吗，就是说能不能程序自动命名输出后的PDF文件名。我一个个去改打出来的PDF文件也费时费力啊。想实现全自动化。

oyxx1023 · 发表于 2013-7-11 17:09:08

本帖最后由 oyxx1023 于 2013-7-11 17:14 编辑

Gu_xl 发表于 2013-7-11 12:30
控制面板里设置一下PDF打印机如下图：

每次打印完成后将默认保存的pdf文件改名后继续打印即可！

不好意思，思考了一下，理解了GU兄的意思，您的意思是打印完了后程序自动搜索生成的PDF文件改名吗?
如果是这样的话，PDF文件位置的查找就成了个问题，不知道程序有没有办法获得生成PDF文件的位置

陨落 · 发表于 2013-7-11 18:17:03

文件名是可以在lisp里面指定的，我写过这样的一个程序，但是得对图框进行处理，好找到对应的图形。(command "plot" "Y" "模型" "dwg to pdf" tf    "m" fx
      "n" "w"    p1    p2    "F" "C" "Y" "monochrome"
      "Y" "A"    mc    "Y"    "Y"
      )，其中mc这个变量就是图纸名称

Gu_xl · 发表于 2013-7-11 18:53:00

oyxx1023 发表于 2013-7-11 17:09
不好意思，思考了一下，理解了GU兄的意思，您的意思是打印完了后程序自动搜索生成的PDF文件改名吗?
...

第一个红圈指示的就是保存位置！

oyxx1023 · 发表于 2013-7-11 21:36:50

Gu_xl 发表于 2013-7-11 18:53
第一个红圈指示的就是保存位置！

默认是在我的文档里，就怕如果别人用程序的时候改成了D盘或者其它不在支持路径的目录下就不好找呀。

sicky111 · 发表于 2013-7-11 23:23:55

我也有这方面的困扰。

账号		自动登录	找回密码
密码			注册

[讨论] 批量转PDF文件

评分

本帖子中包含更多资源