Hello
war you planned a support for newer Autocad Versions >2000 ?
I do not think the support by Autodesk for the versions <= 2000 any
longer for a long time am kept upright.
Please they inform me about planned activities of you.
friendly
Mario Rainer
Page 1 of 1
Autocad Versions >2000
#3
Posted 17 May 2008 - 09:08 AM
If your computer has AutoCAD maybe you can use the following code to manage different versions of AutoCAD files:
Private WithEvents acadApp As AcadApplication
Private Sub Form_Load()
Dim Center As Variant
Set acadApp = CreateObject("AutoCAD.Application")
Center = Array(0#, 0#, 0#)
acadApp.Documents.Add
acadApp.Documents.Item(0).Activate
acadApp.Documents.Item(0).Import "c:\test.dxf", Center, 1
acadApp.Documents.Item(0).SaveAs "c:\test", AcSaveAsType.ac2004_dwg
acadApp.Documents.Close
acadApp.Quit
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set acadApp = Nothing
End Sub
Athanasios Gardos
Avax-Software.com
Avax-Software.com
Page 1 of 1
Sign In
Register
Help
Add Reply

MultiQuote