@创雅设计 咋弄，能不能教教我，谢谢了
柳飘飘 发表于 2022-6-9 10:27
@创雅设计 咋弄，能不能教教我，谢谢了
做安装包，一两下是不可能教会你的了。我可以帮你做好啊。
這個問我就 對了!
@lee50310 版主，咋操作呢？能bat批处理脚本实现，或者vbs脚本实现。谢谢了
本帖最后由 lee50310 于 2022-6-12 10:42 编辑
柳飘飘 发表于 2022-6-11 18:11
@lee50310 版主，咋操作呢？能bat批处理脚本实现，或者vbs脚本实现。谢谢了
首先你先了解一個autocad環境變數當 SECURELOAD 值為 1
載入lisp程式會出現 下面的安全性提示
環境變數SECURELOAD
這是AutoCAD 2014版本(含以上的版本)開始新增的保護功能，可以關閉 load 詢問(但是官方不建議)。
請輸入 SECURELOAD系統變數,設置為 0 即可。
語法如下:
(setvar "SECURELOAD" 0) ;關閉安全性提示
(setvar "SECURELOAD" 1) ;打開安全性提示
然後將你要自動開機或打開圖檔時 要載入的程式(例: viewdcl.vlx , tt.lsp)寫進 acaddoc.lsp
例: 我的cad2018版 安裝在C槽
所以將 acaddoc.lsp 程式放入下面路徑資料夾 Support 內即可(請依自己的CAD 版本為主)
C:\Program Files\Autodesk\AutoCAD 2018\Support
此為acaddoc.lsp 程式範例語法
(defun s::startup ()
(setvar "SECURELOAD" 0) ;關閉安全性提示
;;<--->這裡放入你要載入的程式
(load "D:\\TEST_LSP\\viewdcl.vlx")
(load "D:\\TEST_LSP\\tt.lsp")
;;<---->
(setvar "SECURELOAD" 1) ;打開安全性提示
)
這樣你cad開機或另開啟圖檔時 都會自動搜尋
CAD安裝路徑Support目錄下的 acaddoc.lsp 並執行 及
載入 D槽內的兩個 LISP程式而不會出現 安全性的詢問
@lee50310 谢谢版主，我晚上测试一下看看。
这样是不是就直接覆盖了原版的acaddoc.lsp文件呢？倘若原版acaddoc.lsp文件也被别的程序修改过、适配过，岂不是就出问题了。
本帖最后由 lee50310 于 2022-6-13 07:15 编辑
柳飘飘 发表于 2022-6-12 18:44
这样是不是就直接覆盖了原版的acaddoc.lsp文件呢？倘若原版acaddoc.lsp文件也被别的程序修改过、适配过，岂 ...
如果沒有 acaddoc.lsp 那就創建一個 , 到 安裝AutoCad路徑目錄夾 Support 內
若原本就有 acaddoc.lsp 不可覆蓋,
可編輯 acaddoc.lsp將 你要載入程式的全部內容複製到 原本程式 的後面再存檔即可
@lee50310 版主，有没有什么方法，可以直接在acaddoc.lsp文件的内部的后面，增加上
(load "D:\TEST_LSP\tt.lsp")
比如批处理或者vbs脚本，能不能实现这个功能？
说白了，就是直接修改acaddoc.lsp，是否有方法实现？