[求助]高手请进小妹在等

ldh168 · 发表于 2003-11-12 10:16

本帖最后由作者于 2003-11-12 16:12:21 编辑

用PowerBbuld如何打开已绘好的DWG文件或用VB如何打开已绘好的DWG文件,最好给个例子

jmcen · 发表于 2003-11-12 12:19

对我等来说太深奥了

gzy · 发表于 2003-11-12 16:58

用VB
Set AcadApp = GetObject(, "AutoCAD.application")
If Err Then
      NewApp = True
      Err.Clear
      Set AcadApp = CreateObject("AutoCAD.application")
      If Err Then
         MsgBox Err.Description
         Exit Sub
      End If
End If

AcadApp.documents.open a  ''a为文件完整路径名

ldh168 · 发表于 2003-11-13 08:25

谢谢3楼的,人有会PB的吗

ldh168 · 发表于 2003-11-13 10:33

请问如何判断CAD已经在运行:
我的意思是如果CAD已经在运行时,我就可以不Set AcadApp = CreateObject("AutoCAD.application"),直接打开DWG文件就可以

gzy · 发表于 2003-11-13 10:52

上面不是有吗？

efan2000 · 发表于 2003-11-13 11:50

GetObject就是返回一个已经运行的应用程序实例，当应用程序没有运行时，会产生错误，因而要进行错误处理。CreateObject是创建一个应用程序的实例，而不管应用程序是否已经运行。

ldh168 · 发表于 2003-11-13 12:12

谢谢各位,我已经可以用OLE打开图了
现在有个新的问题,你们一定有感受过用OLE打开已绘好的图时打开的时间很长,但在CAD打开图时速度很快,现在我有个想法如何调用AUTOCAD本身的打开文件的命令,请指教

账号		自动登录	找回密码
密码			注册