Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Edit Links - Load

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Edit Links - Load (987 mal gelesen)
DuffM4nUS
Mitglied
Konstrukteur


Sehen Sie sich das Profil von DuffM4nUS an!   Senden Sie eine Private Message an DuffM4nUS  Schreiben Sie einen Gästebucheintrag für DuffM4nUS

Beiträge: 26
Registriert: 14.04.2016

@ WORK
CATIA V5 R19 SP9
Windows 7 x64 Professional SP1
i7-3740 @ 2.7GHz
16GB RAM
NVIDIA Quadro 3000M
500GB SHDD

erstellt am: 14. Mrz. 2018 22:39    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Unbenannt1.JPG

 
Hallo Gemeinde,

kann man den Befehl "Load" in Edit-Links (siehe Screenshot) per VBA automatisieren?
Denn wenn ich folgenden Code laufen lasse, dann findet dieser nur dann alle Links wenn diese vorher mittels des Load-Button in die Session geladen wurden.
(Es handelt sich um ein CATPart als ActDoc)

Code:

Sub Main()
    Dim oStiEngine As StiEngine
    Dim oStiDBItem As StiDBItem
    Dim oStiDBChild As StiDBChildren
   
    Set oStiEngine = CATIA.GetItem("CAIEngine")
    Set oStiDBItem = oStiEngine.GetStiDBItemFromAnyObject(CATIA.ActiveDocument)
    Set oStiDBChild = oStiDBItem.GetChildren

    Dim ostidbitem2 As StiDBItem
    Dim temp_Path As String
    Dim ik As Integer

    For ik = 1 To oStiDBChild.Count
        Set ostidbitem2 = oStiDBChild.Item(ik)
        temp_Path = ostidbitem2.GetDocumentFullPath

        If Err.Number = 0 Then
            MsgBox temp_Path & Chr(10) & oStiDBChild.LinkType(ik)
        End If
    Next
End Sub


Danke für jegliche Tips!

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

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 15. Mrz. 2018 06:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für DuffM4nUS 10 Unities + Antwort hilfreich

Servus

ggf reicht schon wenn du die verlinkten Dokumente über Documents.Read öffnest.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

DuffM4nUS
Mitglied
Konstrukteur


Sehen Sie sich das Profil von DuffM4nUS an!   Senden Sie eine Private Message an DuffM4nUS  Schreiben Sie einen Gästebucheintrag für DuffM4nUS

Beiträge: 26
Registriert: 14.04.2016

@ WORK
CATIA V5 R19 SP9
Windows 7 x64 Professional SP1
i7-3740 @ 2.7GHz
16GB RAM
NVIDIA Quadro 3000M
500GB SHDD

erstellt am: 15. Mrz. 2018 18:03    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Bernd,

danke für deinen Beitrag!

Der Hintergrund ist: Ich möchte einen Check durchführen, ob alle Links des CATParts auf im PDM abgelegte CATParts zeigen. (Erkennbar am Dateinamen)
Ich weiß aber nicht von vornherein, ob das CATPart überhaupt Links hat und wo diese ggf. hinzeigen.

Die einzige mir bekannte VBA Funktion um Links zu lesen ist die oben gepostete.
Diese funktioniert aber nur, wenn über "Load" alle verlinkten Dokumente bereits geladen wurden.
Somit kann ich Documents.Read leider auch keinen Input geben.

Gibt es eine andere Möglichkeit an die Links zu kommen?

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

DuffM4nUS
Mitglied
Konstrukteur


Sehen Sie sich das Profil von DuffM4nUS an!   Senden Sie eine Private Message an DuffM4nUS  Schreiben Sie einen Gästebucheintrag für DuffM4nUS

Beiträge: 26
Registriert: 14.04.2016

@ WORK
CATIA V5 R19 SP9
Windows 7 x64 Professional SP1
i7-3740 @ 2.7GHz
16GB RAM
NVIDIA Quadro 3000M
500GB SHDD

erstellt am: 24. Apr. 2018 20:03    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo nochmal,

ich habe das Problem über:

Code:
CATIA.StartCommand (Links...)

und WINAPI gelöst. ;-)

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz