vla-open 出现“Automation 错误。未提供说明。”怎么回事？

_rocky

命令: (setq dbx (Vlax-Get-Or-Create-Object (strcat "ObjectDBX.AxDbDocument."
(substr (getvar "acadver") 1 2))))
#<VLA-OBJECT IAxDbDocument 1f3301e8>
命令: 'VLIDE
命令:
命令: *取消*
命令: *取消*
命令: (vla-open dbx (SETQ PATH "E:\\Work.SYC\\B5\B5\\(X)CELL
CF\\X02ELL0400.dwg"))
Automation 错误。未提供说明。

1. 
   
2. (defun c:xrefCheck()
   
3.   (VL-LOAD-COM)
   
4.   (setq dbx (Vlax-Get-Or-Create-Object (strcat "ObjectDBX.AxDbDocument." (substr (getvar "acadver") 1 2))))
   
5.   (vla-open dbx (SETQ PATH "E:\\Work.SYC\\B5\B5\\(X)CELL CF\\X02ELL0400.dwg"))
   
6.   ;(setq Model (Vlax-Get dbx 'ModelSpace))
   
7.   (setq xrefList (listxrefs));listxrefs为自定义函数，目的是返回vla-open 的DWG文件所有外部引用列表
   
8.   (print xrefList)
   
9.   (vlax-release-object dbx)
   
10.   (princ)
    
11.   )
    

<br /> (defun c:xrefCheck()<br />   (VL-LOAD-COM)<br />   (setq dbx (Vlax-Get-Or-Create-Object (strcat "ObjectDBX.AxDbDocument." (substr (getvar "acadver") 1 2))))<br />   (vla-open dbx (SETQ PATH "E:\\Work.SYC\\B5\B5\\(X)CELL CF\\X02ELL0400.dwg"))<br />   ;(setq Model (Vlax-Get dbx 'ModelSpace))<br />   (setq xrefList (listxrefs));listxrefs为自定义函数，目的是返回vla-open 的DWG文件所有外部引用列表<br />   (print xrefList)<br />   (vlax-release-object dbx)<br />   (princ)<br />   )<br />

Andyhon

且先试
(vla-open dbx (SETQ PATH "E:\\Work.SYC\\B5\B5\\(X)CELL CF\\X02ELL0400.dwg"))
==>
(vla-open dbx (SETQ PATH "E:\\Work.SYC\\B5\\B5\\(X)CELL CF\\X02ELL0400.dwg"))

不行的话把路径简化至根目录 ,感觉上是 PATH 出了问题

_rocky

Andyhon 发表于 2012-6-23 23:03
且先试
(vla-open dbx (SETQ PATH "E:\\Work.SYC\\B5\B5\\(X)CELL CF\\X02ELL0400.dwg"))
==>

问题已解决，谢谢。是PATH的问题

qianzj

_rocky 发表于 2012-6-24 09:10
问题已解决，谢谢。是PATH的问题

怎么解决的？

Bdj

qianzj 发表于 2019-2-28 17:19
怎么解决的？

估计是在任务管理器里面把那个，actvie开头的应程序关闭了，在重新启动CAD就可以了。