如何找到AutoCAD的安装路径

Kerry · 发表于 2006-12-7 08:07:27

如何找到AutoCAD#039；使用VBA？如果你也能告诉我如何用LISP做到这一点，我会很高兴
到目前为止，我已经使用了CurDir函数，但尽管有时它返回AutoCAD#039；的安装路径，其他一些则返回“我的文档”文件夹。。。事实是，我不&#039；我真的不明白当前目录代表什么……无论如何，我想知道如何获得该路径（尤其是通过VBA）。

Kerry · 发表于 2006-12-7 08:13:24

你想要ACAD吗。exe地址或支持文件搜索路径；从选项-&gt；文件您熟悉ActiveX对象模型吗？

Kerry · 发表于 2006-12-7 08:26:04

选择ThisDrawing.Application.preferences.Files。全名（getenv“ACAD”）
（findfile“acad.exe”）
欢迎来到theSwamp；伊利卡特

rkmcswain · 发表于 2006-12-7 14:35:52

&nbsp；哦，天哪，天哪！这比我想象的要有用得多！谢谢你的到来
；你看，我来到这个论坛多亏了基思·布莱克，我不小心在网上看到了他的名字。我过去是一个CADalog论坛的用户，在那里遇到了很多人，像基思·布莱克、达伦、t-bear和许多其他人，我希望我也能在这里看到他们。它&35;039；自从我专注于为AutoCAD编写代码以来，我已经有了很多想法，但现在我决定实现我那时候的一个梦想。你看，当时我创建了一个大型建筑程序，并希望尽可能多地向公众提供它。时间过去了，我不得不做其他事情，但现在我希望我能做到。它的名字将是FreeCAD，并将以两种语言（希腊语和英语）提供；同时，我希望我能使myshelf对论坛上的其他人有用。再次感谢你的帮助。我将发布另一个关于在AutoCAD中使用Access的主题！

rkmcswain · 发表于 2006-12-8 01:05:42

本人&#039；我为你高兴。

Kerry · 发表于 2006-12-8 07:59:01

Lisp语言

copy

(vl-registry-read (strcat "HKEY_LOCAL_MACHINE\" (vlax-product-key)) "ACADLOCATION")

VBA

copy

ThisDrawing.Application.Path

Kerry · 发表于 2006-12-8 15:21:12

&nbsp；谢谢你，rkmcswain。我不想低估你的答案，我已经找到了。你看，自从Kerry Brown告诉我关于应用程序对象的事，我搜索了它的属性并找到了路径属性；然而，既然你提到了这一点，让我问一些其他的问题：；假设没有&#039；没有任何路径属性，只有全名属性。如何从全名中提取路径字符串？我需要使用右等函数，但是，我仍然无法获得它。。。

如何找到AutoCAD的安装路径

发表回复

精选推荐