Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  PDF Datei aufrufen (CATVBA)

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:  PDF Datei aufrufen (CATVBA) (1618 mal gelesen)
MichaelTreiber
Mitglied
Technischer Produktdesigner


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

Beiträge: 63
Registriert: 26.01.2011

Win XP/7 (64 Bit)
Catia V5R18

erstellt am: 17. Apr. 2012 14:23    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 und schon wieder stehe ich vor einem kleinen Problem 

Also mit einem Click auf ein Hilfesymbol soll sich eine Hilfedatei öffnen:

Eine PDF Datei namens Help.pdf mit einem festen Pfad.

Wie kann ich diese über eine UserForm öffnen?

Hab in der V5automation mal geschaut , vielleicht mit OpenAsTextStream oder Shell?

Jedoch bin ich mit den Funktionen nicht sonderlich weitergekommen, vielleicht hab ich die Funktionen aber auch nur falsch verstanden.

Kann mir evtl jemand weiterhelfen?

Danke im Vorraus

------------------
Grüße aus dem schönen Düsseldorf
Michael

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

RSchulz
Moderator²
Head of CAD, Content & Collaboration / IT-Manager



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

Beiträge: 5541
Registriert: 12.04.2007

@Work
Lenovo P510
Xeon E5-1630v4
64GB DDR4
Quadro P2000
256GB PCIe SSD
512GB SSD
SmarTeam V5-6 R2016 Sp04
CATIA V5-6 R2016 Sp05
E3.Series V2019
Altium Designer/Concord 19
Win 10 Pro x64

erstellt am: 17. Apr. 2012 14:46    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 MichaelTreiber 10 Unities + Antwort hilfreich

Hallo Michael,
versuch mal folgendes, damit bist du auch auf der sicheren Seite!

Code:

'Diese Funktion sucht dir zur Datei das passende Programm und öffnet diese in diesem
Declare Function ShellExecute Lib "shell32" Alias "ShellExecuteA"(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Sub CATMain()

    Dim stDoc As String

    stDoc = "D:\Test.pdf"

    'öffnet D:\Test.pdf mit dem installierten Adobe Reader
    ShellExecute 0, "Open", stDoc, vbNullString, vbNullString, vbNormalFocus

End Sub


------------------
MFG
Rick Schulz

Nettiquette (CAD.de)  -  Was ist die Systeminfo?  -  Wie man Fragen richtig stellt.  -  Unities

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

RSchulz
Moderator²
Head of CAD, Content & Collaboration / IT-Manager



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

Beiträge: 5541
Registriert: 12.04.2007

@Work
Lenovo P510
Xeon E5-1630v4
64GB DDR4
Quadro P2000
256GB PCIe SSD
512GB SSD
SmarTeam V5-6 R2016 Sp04
CATIA V5-6 R2016 Sp05
E3.Series V2019
Altium Designer/Concord 19
Win 10 Pro x64

erstellt am: 17. Apr. 2012 14:51    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 MichaelTreiber 10 Unities + Antwort hilfreich

Alternativ dazu oder wenn du gezielt eine bestimmte Version aufrufen möchtest, musst du folgendes nehmen...

Code:

Sub CATMain()

    Dim myShell As Object
    Dim stDoc As String

    stDoc = "D:\Support NR 85243.pdf"
    stAppName = "C:\Program Files\Adobe\Reader 10.0\Reader\AcroRd32.exe"
    Call Shell(stAppName & " " & stDoc, 1)

End Sub


Dann muss allerdings auch immer der Installationpfad vom Reader der gleiche sein. Daher ist die andere Variante die sichere!

------------------
MFG
Rick Schulz

Nettiquette (CAD.de)  -  Was ist die Systeminfo?  -  Wie man Fragen richtig stellt.  -  Unities

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

MichaelTreiber
Mitglied
Technischer Produktdesigner


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

Beiträge: 63
Registriert: 26.01.2011

Win XP/7 (64 Bit)
Catia V5R18

erstellt am: 17. Apr. 2012 15:02    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

Ist ja komplizierter als ich dachte , aber vielen Dank, läuft einwandfrei!

------------------
Grüße aus dem schönen Düsseldorf
Michael

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