| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY bietet das umfangreichste Ökosystem von B2B als auch B2C-Lösungen für IT-Akteure auf dem Markt, eine Pressemitteilung
|
Autor
|
Thema: Name.ipt auslesen (1499 mal gelesen)
|
Enduro Mitglied Wirtschaftsinformatik Studentin
Beiträge: 53 Registriert: 27.07.2012 Hallo Forum :-) Win 7 Office 2007 Autodesk® Inventor® 2012
|
erstellt am: 07. Aug. 2012 12:00 <-- editieren / zitieren --> Unities abgeben:
Hallo Forum, ich kann ja das "Part Number" aus dem Erstansicht iProps so auslesen: Dim oReferencedPartDoc As PartDocument Set oReferencedPartDoc = oDrawDoc.ReferencedDocuments.Item(1) Dim aPropValue As String aPropValue = oReferencedPartDoc.PropertySets.Item("{32853F0F-3444-11D1-9E93-0060B03C1CA6}").Item("Part Number").Value was muss ich unter item("") reinschreiben, damit ich den Namen vom Bauteil selbst bekomme und nicht das Part Number. Also ich meine das unter Erstansicht/iProperties/Allgemein/Name.ipt Ich habe auch schon die Tabelle gefunden und alle möglichen Property Name ausprobiert unter dem Link: http://modthemachine.typepad.com/files/iProperyNameTable.pdf Funkt alles nicht. Kann mir da vlt. einer helfen? Vielen Dank im Voraus. VG Endu [Diese Nachricht wurde von Enduro am 07. Aug. 2012 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2580 Registriert: 15.11.2006 Windows 10 x64, AIP 2020-2025
|
erstellt am: 07. Aug. 2012 13:25 <-- editieren / zitieren --> Unities abgeben: Nur für Enduro
Hallo Das ist kein iPropertie, sondern eine dynamisch generierte Anzeige im Dialog. Da kann man nix auslesen. Was du suchst, findest du unter Code: oReferencedPartDoc.FullDocumentName
Und ich ahne es schon, der Pfad muß weg: Code: Dim sFullFileName As String sFullFileName = oReferencedPartDoc.FullDocumentNameDim oArray() As String oArray = Split(oFullFileName, "\") Dim sFileName As String sFileName = oArray(UBound(oArray))
------------------ MfG Ralf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Enduro Mitglied Wirtschaftsinformatik Studentin
Beiträge: 53 Registriert: 27.07.2012 Hallo Forum :-) Win 7 Office 2007 Autodesk® Inventor® 2012
|
erstellt am: 07. Aug. 2012 14:27 <-- editieren / zitieren --> Unities abgeben:
|
Enduro Mitglied Wirtschaftsinformatik Studentin
Beiträge: 53 Registriert: 27.07.2012 Hallo Forum :-) Win 7 Office 2007 Autodesk® Inventor® 2012
|
erstellt am: 07. Aug. 2012 16:05 <-- editieren / zitieren --> Unities abgeben:
Hallo Ralf, Vielen Dank für deine schnelle Antwort. Ich kapiere das aber nicht so ganz, warum array? Und mit FullDocumentName habe ichs auch versucht gehabt aber der gibt keinen wert zurück.. also ich will dass der Name des Erstansicht File rausgelesen wird z.b. im MsgBox sFileName. Dim sFullFileName As String sFullFileName = oReferencedPartDoc.FullDocumentName Dim oArray() As String oArray = Split(oFullFileName, "\") Dim sFileName As String sFileName = oArray(UBound(oArray)) MsgBos sFileName ? als sFileName gibt er mir keinen Namen zurück. vielen Dank schon mal Grüß Endu Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik
Beiträge: 2580 Registriert: 15.11.2006 Windows 10 x64, AIP 2020-2025
|
erstellt am: 07. Aug. 2012 16:20 <-- editieren / zitieren --> Unities abgeben: Nur für Enduro
Hups, kleiner Tipfehler Code: Dim sFullFileName As String sFullFileName = oReferencedPartDoc.FullDocumentNameDim oArray() As String 'die Variable heißt doch nicht oFullFileName, sondern sFullFileName oArray = Split(sFullFileName, "\") Dim sFileName As String sFileName = oArray(UBound(oArray))
Kurze Erklärung, der volle Dokumentname wird über die Split-Funktion an jedem "\" getrennt, wobei der Backslash rausfliegt. Übrig bleibt ein Array mit den "Bruchtstücken". Da uns nur der Dateiname interessiert, wollen wir nur das letzte Feld im Array auslesen. Unglücklicherweise wissen wir vorher die Pfadlänge nicht, haben also auch keine Ahnung das wievielte Arrayfeld wir ansprechen müssen. Der Befehl UBound gibt uns die untere Grenze des Arrays (Indexwert des letzten Feldes)zurück. Genau was wir wollen. So, alle Klarheiten beseitigt? ------------------ MfG Ralf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Enduro Mitglied Wirtschaftsinformatik Studentin
Beiträge: 53 Registriert: 27.07.2012 Hallo Forum :-) Win 7 Office 2007 Autodesk® Inventor® 2012
|
erstellt am: 07. Aug. 2012 16:47 <-- editieren / zitieren --> Unities abgeben:
|