Question

在VB中如何实现相对路径调用CAD应用程序~~

在VB中~~我想调用ATOUCAD的应用程序打开DWG格式的文件~
我使用
Shell "D:\program files\AutoCAD 2004\acad.exe", vbNormalFocus
完成操作~可这是一个绝对路径,在别的机上或没安装CAD的机上就会提示出错,我想问下有没有办法,像关联WINDOWS自带的浏览器一样~通过修改注册表或是其它方法达到相对的调用CAD应用程序呢?
有的话可以给出程序吗?因为我对这些比较陌生~~谢谢了~

Answer 1

VB中一个对象名字叫app
App 对象是通过关键字 App 访问的全局对象。它指定如下信息：应用程序的标题、版本信息、可执行文件和帮助文件的路径及名称以及是否运行前一个应用程序的示例。

app.path就是表示当前程序所在的目录。
你可以用它和你的程序行相结合来找到相对路径

不过从你的叙述来看，你可能更需要下面的信息。

为可执行文件显示或设置一个搜索路径。

PATH [[drive:]path[;...][;%PATH%]
PATH ;

键入 PATH ; 清除所有搜索路径设置并指示 cmd.exe 只在当前
目录中搜索。
键入 PATH 但不加参数，显示当前路径。
将 %PATH% 包括在新的路径设置中会将旧路径附加到新设置。

这样，你把path变量加入你的acad路径，只要调用acad.exe即可，并不需要指定位置。

因为你不给悬赏分，我也懒得写更多了，祝好运。