Hangman 发表于 2011-1-17 19:23:36

VBScript：如何确定哪个版本的CAD...

下午大家，
我正在编写一个脚本来激活任何给定机器上当前正在运行的AutoCAD程序，然后运行LisP。
我被困在如何确定当前正在运行哪个版本以使其处于活动状态。
如果我试图这样做：
Set WSO = WScript.CreateObject("WScript.Shell")
...
Function ActivateACAD()
WSO.AppActivate "AutoCAD Map 3D 2011"   ' What if the user is running "AutoCAD Map 3D 2010"
...

我会只使用IF语句吗？
IF NOT WSO.AppActivate "AutoCAD Map 3D 2010" Then
WSO.AppActivate "AutoCAD Map 3D 2011"
End If
感谢您的帮助。
**** Hidden Message *****

fixo 发表于 2011-1-18 07:59:48

也许你可以从注册表中找到版本号？

fixo 发表于 2011-1-18 08:00:16

或者执行查找文件并读取返回的路径

fixo 发表于 2011-1-24 03:21:51

试试类似的方式
'demo.vbs
Dim WSHShell
Dim AcApp
Set WSHShell   = WScript.CreateObject("WScript.Shell")
Dim appname
appname="AutoCAD.Application"
Set AcApp = WScript.CreateObject(appname)
AcApp.Visible=True
WSHShell.AppActiVate AcApp.Caption
~'J'~
页: [1]
查看完整版本: VBScript：如何确定哪个版本的CAD...