Hat jemand den korrekten Syntax für die DWF Option zum schreiben der Positionsdarstellungen ??
Ich kämpfe nun seit 2 Stunden und nix geht voran.
Hier ein auszug
*******************************
Select Case AUTO_IAM_DWF_POSITIONAL_REPRESENTATIONS
Case "NO"
oOptions.Value("Positional_Representations") = False
Case "YES"
Dim oDoc As Inventor.AssemblyDocument
oDoc = oapp.ActiveDocument
Dim oRepMgr As RepresentationsManager
oRepMgr = oDoc.ComponentDefinition.RepresentationsManager
Dim allcomp As PositionalRepresentation
Dim oRepMgr_dumm As Long
Dim oRepMgr_test, oRepMgr_last, dummyposrep As String
oRepMgr_dumm = 1
oRepMgr_test = "new"
oRepMgr_last = "old"
dummyposrep = "i"
Do Until oRepMgr_test = oRepMgr_last
oRepMgr_last = oRepMgr_test
Try
allcomp = oRepMgr.PositionalRepresentations.Item(oRepMgr_dumm)
oRepMgr_test = allcomp.Name
oOptions.Value("Positional_Representations") =("Positional_Representation:" & (oRepMgr_test))
oRepMgr_dumm = oRepMgr_dumm + 1
Catch ex As Exception
End Try
Loop
oRepMgr_dumm = Nothing
oRepMgr_test = Nothing
oRepMgr_last = Nothing
dummyposrep = Nothing
End Select
*******************************
Es geht um die folgende Stelle
oOptions.Value("Positional_Representations") = "Positional_Representation:" & (oRepMgr_test))
Die API Hilge gibt folgende Syntax Beschreibung ?????
Positional_Representations Positional_Representation:1 Name string
... ...
Positional_Representation:2 Name string
Danke für eure Hilfe
------------------
[img][/img]
"Das Motto des Tages"
Wir hatten nie 'ne Schulung in Inventor
Wir hatten nie 'ne Schulung in Methodik
Wir haben keinen Wartungsvertrag
Wir haben keinen Admin
Wir haben trotzdem Spaß!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP