Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Inventor .NET
  Projekt öffnen

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
  
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 (2033 mal gelesen)
Fiedel93felix
Mitglied
Konstrukteur


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

Beiträge: 448
Registriert: 19.02.2014

Autodesk Inventor 2014
Microsoft Visual Basic 2010

erstellt am: 07. Apr. 2017 09:29    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 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


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

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 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 Fiedel93felix 10 Unities + Antwort hilfreich

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


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

Beiträge: 448
Registriert: 19.02.2014

Autodesk Inventor 2014
Microsoft Visual Basic 2010

erstellt am: 10. Apr. 2017 12:06    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

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


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

Beiträge: 448
Registriert: 19.02.2014

Autodesk Inventor 2014
Microsoft Visual Basic 2010

erstellt am: 10. Apr. 2017 13:21    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

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



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

Beiträge: 14
Registriert: 17.10.2018

erstellt am: 19. Okt. 2018 18:54    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 Fiedel93felix 10 Unities + Antwort hilfreich

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


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

Beiträge: 448
Registriert: 19.02.2014

Autodesk Inventor 2014
Microsoft Visual Basic 2010

erstellt am: 30. Okt. 2018 09:21    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 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



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

Beiträge: 14
Registriert: 17.10.2018

erstellt am: 05. Nov. 2018 17:05    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 Fiedel93felix 10 Unities + Antwort hilfreich

Hallo Felix.

Das Problem befand sich - wie so oft - zwischen Bürosessel und Tastatur 
Jetzt läuft alles perfekt!
Danke für die Antwort!

LG
Reinhard

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