[求助]：如何用vl打开一个dwg？

urljit · 发表于 2004-11-5 21:38:46

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

(setq fl(getfiled "---" "" "dwg" 0))
(setq ob(vlax-get-acad-object))
ob.open fl

#<VLA-OBJECT IAcadApplication 00ac8928>
"D:\\Program Files\\ACAD2000\\图形3.dwg"

复制代码

为什么不能打开呢？

aidraft · 发表于 2004-11-5 22:14:41

究竟是vlisp还是vba? 另外
ob没有open方法，document(s)对象才有

urljit · 发表于 2004-11-6 12:00:13

我是要vlisp的，谢谢楼上的朋友，document的open方法，我弄好了。如下：[PHP]
(defun c:vlopen ()
  (setq acadApp    (vlax-get-acad-object)
acadDocs (vla-get-documents acadApp)
  )
  (setq dwgname (getfiled "---" "" "dwg" 0))
  (vla-open acadDocs dwgname)
  (princ)
)
[/PHP]

silen618 · 发表于 2004-11-22 16:30:04

如何在不显示的情况下打开文件呢？
如需要对批量文件进行操作，就不需要每个文件都打开了。
急……

lsjjm · 发表于 2004-11-23 03:40:33

或者：
(vl-cmdf "vbastmt" "AcadApplication.Documents.Open \"c:/Program Files/ACAD2000/图形3.dwg\"")

urljit · 发表于 2004-11-26 06:53:33

最初由 silen618 发布
[B]如何在不显示的情况下打开文件呢？
如需要对批量文件进行操作，就不需要每个文件都打开了。
急…… [/B]

批量打开用这里的可否？
http://www.xdcad.net/article/article/htmlcache/1861.html

zk_hisen · 发表于 2004-11-26 09:29:44

批量处理图纸也正是我要解决的问题，有些还真的无法用script解决啊。

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

[求助] [求助]：如何用vl打开一个dwg？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子