InputFileName
The input file name that you want to be converted
Property Let InputFileName As String
No parameters
Type
Property Let Type As Long
No parameters
Conversion Type:
1 ---- DWG to DXF
2 ---- DXF to DWG
3 ---- File version conversion, for example 2004 to R14
Version
Property Let Version As Long
No parameters
The AutoCAD file version convert to
0 ---- Current version
1 ---- 2000~2002
2 ---- R14
3 ---- R13
4 ---- R12
5 ---- R11
6 ---- R10
7 ---- R9
8 ---- 2004~2006
9 ---- 2007~2009
10 --- 2010~2012
11--- 2013~2022
Notice: This program does NOT convert AutoCAD R9, R10 and R11 versions from DXF to DWG, which are Autodesk releases earlier in year 1990.
OutputFileName
The input file name that you want converte to.
Property Let OutputFileName As String
No parameters
Convert
Convert InputFileNameto OutputFileName.
Sub Convert
No parameters
Sample Code (in VB) for your reference:
set obj = CreateObject("ActiveConverter.ADConverter")
obj.Type = 2 'DXF to DWG
obj.Version = 0 'Current Version
obj.InputFileName = "c:\My Drawings\001.DXF"
obj.OutputFileName ="c:\My Drawings\001.DWG"
obj.Convert
MsgBox "Complete!"