[求助]问两个问题,怎样获取文件夹目录

jxlsp

1.用getfiled可以获取文件,请问用怎样获取文件夹目录?

2.这是一个后台清理的小程序,后台启动的CAD请问怎样关闭?

(defun c:test2()
(setq cadobj (vlax-create-object "AutoCAD.Application"))
(setq docobj
      (vla-open
       (vla-get-documents cadobj)
       "C:\\geology\\图例\\TL004.dwg"      )
  )

(vla-purgeall docobj)
  (vla-close docobj)
  (vlax-release-object cadobj)
 )

caoyin

1. 搜索本论坛

2. 你不是已经 vla-close

飞诗(fsxm)

(vla-quit cadobj)

jxlsp

caoyin发表于2008-9-7 15:28:001. 搜索本论坛2. 你不是已经 vla-close

哪只是关闭文件,没有关闭CAD.

jxlsp

fsxm发表于2008-9-7 15:50:00(vla-quit cadobj)

我试下.

wangph

; error: ActiveX Server returned an error: RPC 服务器不可用。

jxlsp

fsxm发表于2008-9-7 15:50:00(vla-quit cadobj)

可以关闭了,只是会出现提示是否保存对话框, 不知道能不能不显示?