需要提取和更改
是否有任何方法可以通过AutoLISP查找选项的“文件”选项卡中的所有设置，然后将其更改为所需的值？获取环境变量值
Setenv公司
或
（vla get files（vla get preferences（vlax get acad object）））
见附件：
AutoCAD环境变量快速指南。pdf 你可以在这里找到一些东西：
http://rkmcswain.blogspot.com/2007/02/setting-support-paths-via-lisp.html
克鲁格 pBe，
谢谢你的回复。
我不知道如何使用getenv和setenv，也就是说，我不知道变量的名称。
这段代码很好地获取了环境变量，非常感谢您的帮助，但是如何设置变量呢？ 少量样品：
(setq *files*
(vla-get-files
(vla-get-preferences (vlax-get-acad-object))
)
)
(vla-get-TempDirectory *files*)
(vla-put-TempDirectory *files* "C:\\Temp\\")
(vla-get-PrinterConfigPath *files*)
(vla-put-PrinterConfigPath *files* "\\\\ahi\\support\\CAD_Install\\LD6\ahi\\PLOTTERS")ok？
克鲁格 更新了帖子，为您提供SETENV/GETENV参考的附加pdf
至于vl
IAcadPreferencesFiles：该对象包含“选项”对话框上“文件”选项卡中的选项
属性值：
AltFontFile=
AltTabletMenuFile=
应用（RO）=#
自动保存路径=
配色路径=
配置文件（RO）=
自定义词典=
自定义路径=
默认InternetURL=
驱动器路径=
企业用户文件=
FontFileMap=
帮助文件路径=
日志文件路径=
主词典=
菜单文件=
页面设置覆盖模板文件=
PlotLogFilePath=
PostScriptPrologFile=
打印机配置路径=
打印机路径=
PrinterStyleSheetPath=
打印文件=
打印后台打印路径=
PrintSpool可执行文件=
QNewTemplateFile=
支持路径=
TempFilePath=
TemplateDwgPath=
TempXrefPath=
文本编辑器=
纹理贴图=
工具选项板路径=
工作空间路径=
支持的方法：
GetProjectFilePath（1）
SetProjectFilePath（2）
（vla put QNewTemplateFile VarName“NewValue”）
其中VarName是的乘积
（setq VarName（vla get files（vla get preferences（vlax get acad object）））
检查对象是否具有指定的属性
（vlax-property-available-p VarName“DriversPath”）
或
（setenv QnewTemplate“NewValue”）
Setenv变量名区分大小写，所以要小心
希望这有帮助 克鲁格，谢谢你的目标，但在我的国家，地址是过滤的：震惊：。 pBe和Kruuger，
谢谢你的帮助。
那太糟糕了。 只是一个建议，在设置路径时，您可能希望使用strcat并读取现有路径，然后添加自己的路径，然后更新路径，这样您就不会填充通用的Autocad路径。
像我这样的每一个即将载入2012年的人，这将有助于我们进行设置。
页:
[1]
2