| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Request a special discount on NVIDIA RTX 5000 Ada Generation GPU !, eine Pressemitteilung
|
Autor
|
Thema: Verknüfpung auflösen von Baugruppen (798 mal gelesen)
|
cadtb Mitglied
Beiträge: 17 Registriert: 20.11.2008
|
erstellt am: 12. Dez. 2008 14:43 <-- editieren / zitieren --> Unities abgeben:
Hi, Ich möchte mit VB.Net einen 3D Katalog konvertieren. Das ganze läuft auch relativ gut mit einer Ausnahme. Bei manchen Baugruppen (eher selten), kommt der Dialog zum "Verknüpfung auflösen". Dabei verweist er auf Teile die nicht in die Baugruppe gehören - also tote Links. Hab mal ein Bild im Anhang wie das aussieht. Ich hoffe das das einfacher zu erschlagen ist als jede Baugruppe nach Verknüpfungen zu durchsuchen und für jede nachzuschauen ob die Datei existiert. Wie kann ich verhindern das er das nachfragt? Die Verknüpfungen zu den Teilen die er nicht findet soll er einfach löschen, ignorieren, überspringen, wie auch immer. Er soll nur eben nicht die Operationen anhalten. Wie kann ich das realisieren?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r Moderator Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012
|
erstellt am: 12. Dez. 2008 14:47 <-- editieren / zitieren --> Unities abgeben: Nur für cadtb
|
daywa1k3r Moderator Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012
|
erstellt am: 12. Dez. 2008 15:22 <-- editieren / zitieren --> Unities abgeben: Nur für cadtb
Zitat: Original erstellt von cadtb:
Darunter find ich nichts. Weder in der Inventor 2008 -, noch in der VB Studio 2005 Hilfe.
In der API Hilfe natürlich... Zitat:
Description Gets/sets the Boolean flag that controls whether an operation will proceed without prompting (if that gets required...e.g.: error message dismissal). If Autodesk Inventor is running visible, this property is FALSE by default. Property type Read-write propertySyntax (Visual Basic) Public Property SilentOperation() As Boolean
------------------ Grüße Igor FX64 Software Solutions - Inventor Tools Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadtb Mitglied
Beiträge: 17 Registriert: 20.11.2008
|
erstellt am: 12. Dez. 2008 15:25 <-- editieren / zitieren --> Unities abgeben:
Hm, danke für den Wink in die Richtung. Aber irgendwie versteh ich das trotzdem nicht so ganz, da hält sich die Hilfe mit Informativen Texten sehr zurück. Wie ist das zu verwenden? Habe das jetzt oben drinstehen: Code:
Public Property SilentOperation() As Boolean Get End Get Set(ByVal value As Boolean) value = True End Set End Property
Nur hat das keinen Effekt. Habe auch schon die SuFu genutzt, aber leider kein Beispiel gefunden. Hat hierfür jemand ein kleines Beispiel? Edit: Jupp, hatte zuerst unter F1 die normale Inventor Hilfe, da fand ich nichts. [Diese Nachricht wurde von cadtb am 12. Dez. 2008 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r Moderator Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012
|
erstellt am: 12. Dez. 2008 16:02 <-- editieren / zitieren --> Unities abgeben: Nur für cadtb
|
cadtb Mitglied
Beiträge: 17 Registriert: 20.11.2008
|
erstellt am: 15. Dez. 2008 07:21 <-- editieren / zitieren --> Unities abgeben:
Danke dir, scheint zu funktionieren Allerdings sagt er dennoch gelegentlich "Dokument kann nicht geöffnet werden.", trotz .SilentOperation. Habs mit Code: Try .. Catch ex As Exception Return End Try
probiert, aber kommt dennoch die Meldung. Hast du dafür auch einen Tipp?Hier mal mein Code, evntl. lässt sich da ja noch was verbessern:
Code:
Public Sub FileConvert(ByVal DestinationPath As String, ByVal SourcePath As String, ByVal SourceFile As String, ByVal Extension As String) Dim sFile As String = SourcePath & SourceFile & Extension Dim dFile As String = DestinationPath & SourceFile & ".stp" If Not System.IO.File.Exists(dFile) Then Dim oApp As Inventor.Application Dim oDoc As Inventor.Document Try oApp = System.Runtime.InteropServices.Marshal.GetActiveObject("Inventor.Application") If oApp Is Nothing Then Dim inventorAppType As Type = System.Type.GetTypeFromProgID("Inventor.Application") oApp = System.Activator.CreateInstance(inventorAppType) End If Status.stbox("Konvertiere: " & sFile) oApp.SilentOperation = True oDoc = oApp.Documents.Open(sFile, False) oDoc.SaveAs(dFile, True) iMin = iMin + 1 ConvertProgress(iMin) oDoc.Close(True) Catch ex As Exception Return End Try End If End Sub
[Diese Nachricht wurde von cadtb am 15. Dez. 2008 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |