求助：有没有办法在VB中把DWG格式转化为DXF

lichh_2003 · 发表于 2004-11-5 16:45:00

求助：有没有办法在VB中把DWG格式转化为DXF
谢谢！！

laoliu09 · 发表于 2004-11-5 17:08:00

有！绝对有！但我不知道！等高手来吧！慢慢等--------------------------------------------

雪山飞狐_lzh · 发表于 2004-11-5 17:53:00

[WEB]http://www.vba.cn/object/acad2004/idh_export.htm[/WEB]

lichh_2003 · 发表于 2004-11-5 18:11:00

wo 说的不是这个意思，是在没有CAD的情况下
把DWG文件转化为DXF

zfbj · 发表于 2004-11-5 20:53:00

如果不知道DWG文件格式，就不能。DWG文件格式是保密的，并且每个版本都有变化，因此可以说不能。

lichh_2003 · 发表于 2004-11-7 11:52:00

这个我也已经实现了。
谢谢大家！

zfbj · 发表于 2004-11-7 12:19:00

这么厉害?能否给大家分享一下你的方法？

lichh_2003 · 发表于 2004-11-7 16:09:00

好啊，怎么不给我加分啊
首先在本论坛下载doconvert.exe可执行文件。
然后VB 中用shell函数调用它，这过程中有一些技巧问题，比如使用延迟函数啦，判断转化完成没有啦，等等。
欢迎和我联系qq10364426

dchlmz · 发表于 2004-11-8 11:48:00

请问楼主在哪里下载doconvert.exe呀。能不能给发一个。先谢了
dchlmz@163.com

sealiuliu · 发表于 2007-7-4 12:07:00

可以啊，我用了个打开再另存的办法，不知道是不是很笨啊？
Dim acad As New AcadApplication
acad.Documents.Open “文件地址”
acad.ActiveDocument.SaveAs "E:\llll.dxf", ac2004_dxf