---

Moin,
in einer idw will ich überprüfen, mit welcher ipt oder iam die idw verbunden ist.
ich nutze dazu ReferencedFiles.Count
Ich gehe nun davon aus, dass es eine referenzierte Datei nur geben kann wenn auch ein Ansichtsfenster vorhanden ist.
Nun kommt es aber ab und zu mal vor, das ReferencedFiles.Count 0 wiedergibt, obwohl eine Ansicht vorhanden ist.
Woran kann das liegen oder gibt es einen anderen Weg die refernzierte Datei zu ermitteln?

sub ref() 
  Implements ApplicationAddInServer
  Dim oApp As Inventor.Application

  Dim oDrawDoc As DrawingDocument
  Set oDrawDoc = oApp.ActiveDocument

  Dim bRefExist As Integer
  bRefExist = oDrawDoc.ReferencedFiles.Count
end sub

------------------
Tata
Rainer

Phantasie ist wichtiger als Wissen, denn Wissen ist begrenzt!

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

---

Hallo Rainer,

ich kann nicht nachvollziehen, dass ReferencedFiles.Count = 0 zurueckgibt, wenn es auch Drawing-Views hat. Bei Deinem Code fehlt auf jeden Fall mal

Set oApp = ....

Das koennte natuerlich eine Fehlerquelle sein, da Du nachher Set oDrawDoc = oApp.ActiveDocument brauchst

Ich habe diese hier benutzt:

Private Sub getRefs()
 
  Dim oApp As Inventor.Application
  Set oApp = ThisApplication
 
  Dim oDoc As DrawingDocument
  Set oDoc = oApp.ActiveDocument
 
  For i = 1 To oDoc.ReferencedFiles.Count
 
    MsgBox oDoc.ReferencedFiles(i).DisplayName, , oDoc.ReferencedFiles(i).DocumentType
 
  Next i
 
End Sub

Ich hoffe, das hilft.

Gruesse,

Paul

www.morecam.ch/cad.htm

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

---

Danke für die Antwort aber den set-befehl hab ich auch, hab ich nur vergessen beim posten.
Im Prinzip ist das ja der gleiche code wie ich ihn verwende, allerdings ist eben .count manchmal 0 obwohl Ansichten vorhanden sind. Kann es sein , dass diese Probleme dann auftauchen, wenn die idw's in einer älteren Inventorversion (5.3) erstellt worden sind und die Konvertierung (von Autodesk) zur 7er nicht fehlerfrei gelaufen ist?
Ich bin da "leicht" am verzweifeln bei dieser Blinkerfunktionalität...

------------------
Tata
Rainer

Phantasie ist wichtiger als Wissen, denn Wissen ist begrenzt!

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