---

Ist es möglich wenn idw und ipd gleich heißen und im gleichen Ordner liegen. Wenn nur die idw offen ist ich trozdem die iProperties von der ipd auslesen kann?

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

---

Hallo

Wenn die IDW geöffnet ist, ist auch automatisch die IPT deren Ansicht auf der IDW dargestellt ist geöffnet. Über den DrawingView.ReferencedDocument kommst du an die IPT und somit auch die PropertySets heran.

------------------
MfG
Ralf

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

---

Ich finde das leider nicht in der API?

Hier die API 2010:
http://images.autodesk.com/adsk/files/inventor2010model.pdf

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

---

Moin

Code:

---

Public Sub PartPropertie()

Dim oDrawDoc As DrawingDocument
Set oDrawDoc = ThisApplication.ActiveDocument

Dim oReferencedPartDoc As PartDocument
Set oReferencedPartDoc = oDrawDoc.ReferencedDocuments.Item(1)

Dim oPropValue As String
oPropValue = oReferencedPartDoc.PropertySets.Item("{32853F0F-3444-11D1-9E93-0060B03C1CA6}").Item("Part Number").Value
       
MsgBox "Bauteilnummer: " & oPropValue

End Sub

---

------------------
MfG
Ralf

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

---

Danke für die Antwort (ein wunder das hier noch jmd. ist xD)
Gibt es eine liste von allen: {32853F0F-3444-11D1-9E93-0060B03C1CA6}
und allen arten von "Part Number". Denn ich würde gerne was anderes auslesen.

EDIT: Ok habe sie gefunden =)
Hier in dem PDF Seite 10, 11
http://www.autodesk.com/us/community/mfg/Part_4.pdf

[Diese Nachricht wurde von axi92 am 04. Jul. 2012 editiert.]

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

---

Hi

Die Infos kann man sich auch selber aus der API suchen. Setz im VBA-Editor einen Haltepunkt auf die Zeile "MsgBox "Bauteilnummer: " & oPropValue". Markiere z.B. die Variable oDoc als wenn du den Text kopieren willst, rechte Maustaste und "Überwachung hinzufügen". Eventuell muß noch das Überwachungsfenster über das Menü "Ansicht" eingeblendet werden. Script laufen lassen, es hält am Haltepunkt an und du kannst in der Überwachung den Zweig unter oDoc aufklappen und dir den aktuellen Inhalt anschauen. Mit F8 geht's schrittweise weiter durch den Code.
Ist manchmal ganz praktisch, wenn man partout nicht rauskriegt warum etwas nicht funktioniert.

------------------
MfG
Ralf

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

---

Bei mir kommt jetzt die Meldung Typ Mismatsch. (Bei: Set oReferencedPartDoc = oDrawDoc.ReferencedDocuments.Item(1))
Was bedeutet das?

Das ist mein Block wo ich die iProperties rauslesen will

                            '____________________________________________________________________iProperties_______________________________________
                            ' Get the PropertySets object.
                            Dim oPropSets As PropertySets
                            Set oPropSets = oDoc.PropertySets
                       
                            ' Get the design tracking property set.
                            Dim oPropSet As PropertySet
                            Set oPropSet = oPropSets.Item("Design Tracking Properties")
                       
                            ' Get the drawing number iProperty.
                            'Dim status As Property
                            'Set status = oPropSet.Item("User Status")
                           
                           
                            'Get the ipt status iProperty
                            Dim oDrawDoc As DrawingDocument
                            Set oDrawDoc = ThisApplication.ActiveDocument
                            Dim oReferencedPartDoc As PartDocument
                            Set oReferencedPartDoc = oDrawDoc.ReferencedDocuments.Item(1)

                            Dim oPropValue As String
                            oPropValue = oReferencedPartDoc.PropertySets.Item("{32853F0F-3444-11D1-9E93-0060B03C1CA6}").Item("User Status").Value
                       
                            ' Display the value.
                            MsgBox "The part number is: " & oPropValue
                            '______________________________________________________________________iProperties__________________________________________

[Diese Nachricht wurde von axi92 am 04. Jul. 2012 editiert.]

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

---

Zitat:

---

Original erstellt von axi92:
Bei mir kommt jetzt die Meldung Typ Mismatsch. (Bei: Set oReferencedPartDoc = oDrawDoc.ReferencedDocuments.Item(1))
Was bedeutet das?

...

---

Wird wohl daher kommen, das eine Birne auch kein Apfel ist, obwohl es fast so aussieht  .
Inventor meint hier wohl, dass der Typ nicht richtig ist. Evtl ist ja ein Assembly referenziert oder sonst was. Wenn es ein PartDoc wäre, würde alles ok sein. oder?

------------------
Gruß Lothar Boekels

-----------------------------------------------------
Wir unterstützen die Arbeit der
- Rettungshundestaffel des DRK in Viersen
Das könnt Ihr auch tun.

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

---

versuch es doch mal mit:

Code:

---

...
Dim oReferencedDoc As Document
Set oReferencedDoc = oDrawDoc.ReferencedDocuments.Item(1)

Dim oPropValue As String
oPropValue = oReferencedDoc.PropertySets.Item("{32853F0F-3444-11D1-9E93-0060B03C1CA6}").Item("User Status").Value

---

------------------
Gruß Lothar Boekels

-----------------------------------------------------
Wir unterstützen die Arbeit der
- Rettungshundestaffel des DRK in Viersen
Das könnt Ihr auch tun.

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

---

Ah ok na gut, und wie mache ich es das es bei beiden funktioniert?
Ich will ja nur den Status auslesen und der ist bei beiden iam und ipt vorhanden.

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

---

Zitat:

---

Original erstellt von axi92:
Ah ok na gut, und wie mache ich es das es bei beiden funktioniert?
Ich will ja nur den Status auslesen und der ist bei beiden iam und ipt vorhanden.

---

zzzzz... hast Du denn überhaupt probiert ?

Lothar schreibt ja:
Dim oReferencedDoc As Document

und damit müsste es für ipt und iam gehen...

------------------
Grüsse, Paul

Inventor-Programmierung, Inventor-Tools und Inventor API-Schulung

Online 3D-Ersatzteilkataloge

Meine Tochter auf Youtube

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

---

Nein habe ich nicht, habe den beitrag bis jetzt noch nicht einmal gesehen, ich werd morgen rückmeldung geben. Da ich das ganze am firmen pc mache.
Danke mal fürs erste und ich melde mich wenns geht oder nicht

Danke hat bestens funktioniert, iam und ipt gehen beide 

[Diese Nachricht wurde von axi92 am 05. Jul. 2012 editiert.]

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