bat运行内容
E:\Desktop>FOR %f IN (E:\Desktop\dwg_folder\*.dwg) DO "D:\Program Files\Autodesk\AutoCAD 2021\accoreconsole.exe" /i "%f" /product ACAD /s "E:\Desktop\folder\PDFScript.scr" /l en-US
E:\Desktop>"D:\Program Files\Autodesk\AutoCAD 2021\accoreconsole.exe" /i "E:\Desktop\dwg_folder\gb_a0.dwg" /product ACAD /s "E:\Desktop\folder\PDFScript.scr" /l en-US
Redirect stdout (file: E:\AppData\Local\Temp\accc311842).
AcCoreConsole: StdOutConsoleMode: processed-output: enabled,auto
AutoCAD Core Engine Console - Copyright 2020 Autodesk, Inc. All rights reserved. (R.47.0.0)
Execution Path:
D:\Program Files\Autodesk\AutoCAD 2021\accoreconsole.exe
Version Number: R.47.0.0 (UNICODE)
正在重生成模型。
**** 系统变量更改 ****
已从首选值更改 2 个监视系统变量。使用 SYSVARMONITOR 命令以查看更改。
命令:
命令:
命令:
命令: (setq CurrDwgName (getvar "dwgname"))
命令:
_HELP
命令: (setq Fname (substr CurrDwgName 1 (- (strlen CurrDwgName) 4)))
命令:
HELP
命令: (setq name (strcat (getvar "DWGPREFIX") Fname ".pdf"))
命令:
HELP
命令:
HELP
命令: FILEDIA
输入 FILEDIA 的新值 <0>:
命令:
FILEDIA
输入 FILEDIA 的新值 <0>: 0
命令:
FILEDIA
输入 FILEDIA 的新值 <0>:
命令: -PLOT
是否需要详细打印配置？[是(Y)/否(N)] <否>:
输入布局名或 [?] <模型>:
输入页面设置名 <>: Yes
<Yes> 未找到。
输入页面设置名 <>:
输入输出设备的名称或 [?] <无>:
无法用“无”设备进行打印。
命令: Model
命令:
MODEL
命令:
MODEL
命令: DWG 未知命令“DWG”。按 F1 查看帮助。
命令:
命令: *取消*
命令:
命令: *取消*
命令: _.quit
**** 系统变量更改 ****
已从首选值更改 1 个监视系统变量。使用 SYSVARMONITOR 命令以查看更改。
PDFScript.scr文件
(setq CurrDwgName (getvar "dwgname"))
(setq Fname (substr CurrDwgName 1 (- (strlen CurrDwgName) 4)))
(setq name (strcat (getvar "DWGPREFIX") Fname ".pdf"))
;Command:
FILEDIA
;Enter new value for FILEDIA <1>:
0
;Command:
-PLOT
;Detailed plot configuration? [Yes/No] :
Yes
;Enter a layout name or [?] :
Model
;Enter an output device name or [?] :
DWG To PDF.pc3
;Enter paper size or [?] :
ANSI A (11.00 x 8.50 Inches)
;Enter paper units [Inches/Millimeters] :
Inches
;Enter drawing orientation [Portrait/Landscape] :
Landscape
;Plot upside down? [Yes/No] :
No
;Enter plot area [Display/Extents/Limits/View/Window] :
Extents
;Enter plot scale (Plotted Inches=Drawing Units) or [Fit] :
Fit
;Enter plot offset (x,y) or [Center] <0.00,0.00>:
;Plot with plot styles? [Yes/No] :
Yes
;Enter plot style table name or [?] (enter . for none) <>:
.
;Plot with lineweights? [Yes/No] :
Yes
;Enter shade plot setting [As displayed/legacy Wireframe/legacy Hidden/Visualstyles/Rendered] :
;Enter file name :
!name
;Save changes to page setup? Or set shade plot quality? [Yes/No/Quality] :
No
;Proceed with plot [Yes/No] :
Yes
;Command:
FILEDIA
;;;Enter new value for FILEDIA <1>:
1
你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答
本次提问扣除的有问必答次数，将会以问答VIP体验卡（1次有问必答机会、商城购买实体图书享受95折优惠）的形式为您补发到账户。
因为有问必答VIP体验卡有效期仅有1天，您在需要使用的时候【私信】联系我，我会为您补发。