wuqiu1986 发表于 2012-12-27 15:57:53

求助！！关于ObjectDBX

我电脑装有2004和2008，在研究老大的程序时(defun RegObjectDBX (/ DBXSERVER)
          ;by Tony Tanzillo
    (cond ((vl-registry-read
       "HKEY_CLASSES_ROOT\\ObjectDBX.AxDbDocument\\CLSID"
   ) ;_ vl-registry-read
    )
    ((not (setq DBXSERVER (findfile "AxDb15.dll")))
   (alert "Error: Can't locate ObjectDBX Library (AxDb15.dll)")
    )
    (t
   (startapp "regsvr32.exe" (strcat "/s \"" DBXSERVER "\""))
   (or (vl-registry-read
   "HKEY_CLASSES_ROOT\\ObjectDBX.AxDbDocument\\CLSID"
         ) ;_ vl-registry-read
         (alert
   "Error: Failed to register ObjectDBX ActiveX services."
         ) ;_ alert
   ) ;_ or
    )
    ) ;_ cond
) ;_ defun
注册不成功，而且我搜索了整个电脑也找不到AxDb15.dll，AxDb16.dll。请求帮助！
另外哪位有关于 ObjectDBX 这方面的资料的，希望能慷慨相赠。在此感谢

millermin 发表于 2013-1-1 13:40:37

暂时只能帮顶。

Andyhon 发表于 2013-1-1 15:27:10

AutoCAD 2000 主目录下有 AxDb15.dll
AutoCAD 2004 主目录下有 AxDb16.dll

millermin 发表于 2013-1-2 02:31:17

我的程序找到了，但仅在高版本用过，到是挺顺，你试试。

(setq cadver(substr (getvar "acadver") 1 2))                     
(setq id (strcat "objectdbx.AxDbDocument." cadver))         
(setq dbx(vlax-create-object id))
页: [1]
查看完整版本: 求助！！关于ObjectDBX