| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Projekt öffnen (2054 mal gelesen)
|
Fiedel93felix Mitglied Konstrukteur
Beiträge: 448 Registriert: 19.02.2014 Autodesk Inventor 2014 Microsoft Visual Basic 2010
|
erstellt am: 07. Apr. 2017 09:29 <-- editieren / zitieren --> Unities abgeben:
Hallo miteinander, Ich möchte ein Projekt durch vb.net öffnen. Dazu frage ich erst ab ob eine Datei geöffnet ist in der aktuellen Sitzung ( das funktioniert) und an schließend will ich das Projekt öffnen dabei kommt aber der Fehler! So frage ich ab ob eine Datei geöffnet ist:
Code:
If ThisApplication.ActiveDocument Is Nothing Then Else MsgBox("Eine Datei ist geöffnet!") Exit Sub End If
Zum öffnen habe ich 2 Varianten versucht die beide nicht klappen:
Code: oDoc = ThisApplication.Documents.Open("O:\Inventor\Aufträge\Ptest\PTest.ipj")
Hier bringt Inventor die Meldung "Datei konnte nicht geöffnet werden!" Code:
Dim oProject As Inventor.DesignProject oProject = ThisApplication.DesignProjectManager.DesignProjects.ItemByName("O:\Inventor\Aufträge\Ptest\PTest.ipj") oProject.Activate()
Hier kommt eine Ausnahmefehler! Kann mir da jemand weiter helfen??
------------------ ---------------------------------- Mit freundlichen Grüßen Felix Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ruzy5624 Mitglied Konstruktionsleiter / staatl. gepr. Techniker
Beiträge: 280 Registriert: 01.07.2015 Product Design Suite 2018 Ultimate Visual Studio 2017 Windows 10 Pro Intel Xeon E3-1245 v5 @ 3,5GHz Nvidia Quadro M4000 8GB RAM 32GB 2x 24" Monitore FullHD SpaceMouse Pro
|
erstellt am: 07. Apr. 2017 15:31 <-- editieren / zitieren --> Unities abgeben: Nur für Fiedel93felix
Hallo, Weg 2 ist IMHO richtig. Hier mal ein Ausschnitt aus meinen Code, so wie er bei mir zum Einsatz kommt und funktioniert. Code: Dim oProjectManager As DesignProjectManager = InventorApplication.DesignProjectManager Dim oProject As DesignProject oProject = oProjectManager.DesignProjects.ItemByName("Pfad.ipj") oProject.Activate()
Welchen Fehler wirft er denn? ------------------ Mit Besten Grüßen Ruzy5624 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fiedel93felix Mitglied Konstrukteur
Beiträge: 448 Registriert: 19.02.2014 Autodesk Inventor 2014 Microsoft Visual Basic 2010
|
erstellt am: 10. Apr. 2017 12:06 <-- editieren / zitieren --> Unities abgeben:
Erstmal vielen Dank für die Antwort. Dein Code hat erst auch nicht funktioniert doch dann habe ich herausgefunden woran es liegt. Das Projekt war im Inventor noch nie geöffnet und daher war das Item mit dem Pfad nicht bekannt. Ist das Projekt bekannt funktioniert der Code. Aber es ist meist so das das Projekt unbekannt ist. In diesem Fall muss ich es hinzufügen oder? Dafür sollte doch der Befehl
Code: oProject = ThisApplication.DesignProjectManager.DesignProjects.Add
funktioniern. Die Funktion will von mir: Project Type as Inventor.MultiUserModeEnum Name as String PrjectPath as String Name und Pfad sind ja kein Problem aber was brauche ich für den ProjectType?? ------------------ ---------------------------------- Mit freundlichen Grüßen Felix Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fiedel93felix Mitglied Konstrukteur
Beiträge: 448 Registriert: 19.02.2014 Autodesk Inventor 2014 Microsoft Visual Basic 2010
|
erstellt am: 10. Apr. 2017 13:21 <-- editieren / zitieren --> Unities abgeben:
Okay ich konnte es selbst lösen: Ein neues Projekt:
Code:
oProject = ThisApplication.DesignProjectManager.DesignProjects.Add(Inventor.MultiUserModeEnum.kSingleUserMode, "ProjektProbe", "O:\Inventor\Aufträge\ProbeProjekt")
Ein bereits bestehendes Projekt:
Code:
oProject = ThisApplication.DesignProjectManager.DesignProjects.AddExisting("O:\Inventor\Aufträge\ProbeProjekt\ProbeProjekt.ipj")
------------------ ---------------------------------- Mit freundlichen Grüßen Felix Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ReinhardUW Mitglied
Beiträge: 14 Registriert: 17.10.2018
|
erstellt am: 19. Okt. 2018 18:54 <-- editieren / zitieren --> Unities abgeben: Nur für Fiedel93felix
Hallo! Ich hoffe diesen Betrag liest noch jemand, obwohl er schon so alt ist... Ich habe exakt das gleiche Problem wie Felix, bloß ich kann seine Lösung nicht ganz nachvollziehen (wahrscheinlich liegt's an mir...) Könnte mir jemand einen funktionierenden Code auflisten, der ein Projekt in einem bestimmten Pfad öffnet und aktiviert? Ich wäre euch wirklich sehr, sehr dankbar! Bitte inklusive aller nötigen Dim, Set und sonstiger Befehle.. Ganz liebe Grüße aus dem sonnigen Süden Österreichs Reinhard Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fiedel93felix Mitglied Konstrukteur
Beiträge: 448 Registriert: 19.02.2014 Autodesk Inventor 2014 Microsoft Visual Basic 2010
|
erstellt am: 30. Okt. 2018 09:21 <-- editieren / zitieren --> Unities abgeben:
Hallo Reinhard, wo liegt dein Problem mit dem oben genannten Code?
Code:
Public ThisApplication As Inventor.Application ThisApplication = GetObject(, "Inventor.Application") Dim oProjectManager As Inventor.DesignProjectManager = ThisApplication.DesignProjectManager Dim oProject As Inventor.DesignProject oProject = ThisApplication.DesignProjectManager.DesignProjects.Add(Inventor.MultiUserModeEnum.kSingleUserMode, "Dateiname", "Pfad") oProject.Activate()
------------------ ---------------------------------- Mit freundlichen Grüßen Felix Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ReinhardUW Mitglied
Beiträge: 14 Registriert: 17.10.2018
|
erstellt am: 05. Nov. 2018 17:05 <-- editieren / zitieren --> Unities abgeben: Nur für Fiedel93felix
|