---

Wie kann ich die DWG als 2000er oder 2004er Version exportieren?

Diesen Code habe ich schon probiert aber es ändert nichts:

    '___________________________________________________DWG Form 2000/2004/...______________________________________________________________________
    ' Get the available options from the translator.
    Dim options As NameValueMap
    Set options = transObjs.CreateNameValueMap
    If DWGAddIn.HasSaveCopyAsOptions(oDocument, oContext, oOptions) Then
        ' Set the options for what types of data to write out.
        options.Value("Solid") = True      ' Output solids.
        options.Value("Surface") = False   ' Output surfaces.
        options.Value("Sketch") = False    ' Output sketches.
      
        ' Set the DWG version.
        ' 23 = ACAD 2000 - AC1015
        ' 25 = ACAD 2004 - AC1018
        ' 27 = ACAD 2007
        ' 29 = ACAD 2010 - AC1024
        options.Value("DwgVersion") = 25
    End If
    '___________________________________________________DWG Form 2000/2004/...______________________________________________________________________

Überprüfen kann ich es indem ich die .idw einfach im Texteditor öffne je nach dem was am Anfang steht sehe ich welche Version es ist.
http://newforma.custhelp.com/app/answers/detail/a_id/791/~/check-the-versio n-of-an-autocad-dwg-file

EDIT: Habe es selbst gelöst. Bei mir war options beim speichern oOptions einfach ausgetauscht und geht =)

[Diese Nachricht wurde von axi92 am 29. Jun. 2012 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP