社区 › 源码共享 › VBS做的一键安装(添加支持路径)

669423907 发表于 2013-5-12 15:48:04

;自动添加搜索路径（cabinsummer 2012-4-15）
(setq sp (getenv "ACAD"))
(setq path '(
"E:\\00\\CAD外挂\\燕秀工具箱"
"E:\\00\\CAD外挂"
))

;自动加载目录下的所有 lsp
(foreach x path (setq sp (strcat sp ";" x)))
(setenv "ACAD" sp)

;自动加载菜单文件
(command "cuiload" "机械.cui")
;(command "menu" "机械")

幸福是真 发表于 2013-7-9 12:40:55

很好

清风明月名字 发表于 2013-7-9 13:02:14

谢谢20楼楼主代码分享！

ymcui 发表于 2013-8-5 17:25:48

很好，我也来顶一个

︶ㄣ与狼共舞 发表于 2013-9-6 10:05:38

早怎么没想到呢！

illcyt 发表于 2013-10-15 23:08:33

669423907 发表于 2013-5-12 15:48 static/image/common/back.gif
;自动添加搜索路径（cabinsummer 2012-4-15）
(setq sp (getenv "ACAD"))
(setq path '(


收藏一下，以便学习

laorenhao999 发表于 2013-11-12 13:19:10

虽然用不到，但还是谢谢LZ。支持LZ

清风明月名字 发表于 2013-11-21 09:04:15

"测绘数据处理安装.msi"，这文件又不是源代码，怎么用？VBS的文件格式不是这样的啊

恕放之生命 发表于 2014-7-20 13:08:33

谢谢分享。

hooboxu 发表于 2014-11-27 00:59:31

2010可以吗！？

查看完整版本: VBS做的一键安装(添加支持路径)