lvhaiyan 发表于 2003-10-27 12:35:00

怎么用vb打开autocad 并形成dwf

怎么用vb打开autocad 并形成dwf

风魔飘香 发表于 2003-10-27 13:32:00

Dim oApp As New AcadApplication
    Dim oDoc As AcadDocument
   
    Set oDoc = oApp.Documents.Open("f:\Temp\dwg\0003.dwg")
    oDoc.Plot.PlotToFile "F:\0003.dwf", "PublishToWeb DWF.pc3"
   
    oDoc.Close False
    oApp.Quit
   
    Set oDoc = Nothing
    Set oApp = Nothing

lvhaiyan 发表于 2003-10-27 13:44:00

在R14下怎么 怎么用vb打开autocad 并形成dwf

mccad 发表于 2003-10-27 18:38:00

可以使用Export方法。
    Dim exportFile As String
    exportFile = "d:\AutoCAD\DXFExprt"   ' 你可将路径调整为你需要保存到的路径及文件名
   
   
    '将当前图形输出为指定格式的图形.
    ThisDrawing.Export exportFile, "DWF

lvhaiyan 发表于 2003-10-28 09:26:00

楼主:我试过了,但是不能形成dwf

mccad 发表于 2003-10-28 21:27:00

如果机器中有几个版本的AutoCAD，则经常会出问题。
我的机器装了14,2002,2004，在VB中引用了14的类型库，但由于14的类型库不需要使用版本号，所以就算我打开了AutoCAd R14版，也不能调用R14。
所以你的问题我还是回答不了。呵呵，要先考虑版本的问题了。

randyhuang 发表于 2005-12-14 15:06:00

我也是想知道这个问题，我在写一段程序，但就在这卡住了，有哪位高人可以指点一下？

MJTD_7777 发表于 2005-12-14 15:59:00

<P>ThisDrawing.Export&nbsp;exportFile,&nbsp;"DWF"</P>
<P>&nbsp;</P>
<P>不支持 DWF文件格式。</P>
<P>&nbsp;</P>

randyhuang 发表于 2005-12-15 08:24:00

有哪位高人指点啊，Export不能输出DWF的，急用，谢谢谢谢！！

randyhuang 发表于 2005-12-16 08:12:00

有哪位高人可以指点一下吗？真的很急，望各位大侠鼎力相助，小弟不胜感谢！
页: [1] 2
查看完整版本: 怎么用vb打开autocad 并形成dwf