---

Hallo zusammen,

wie kann ich eine pdf mittels VB6 drucken? Ich habe den Adobe Acrobat Reader 5.1, 6 oder 7 zur Auswahl...

------------------

cu
Heiko

Schau mal rein www.mertens-bb.de

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

---

Hallo Heiko,

das geht so:

Option Explicit

Private Declare Function GetShortPathName Lib "kernel32.dll" Alias "GetShortPathNameA" ( _
    ByVal lpszLongPath As String, _
    ByVal lpszShortPath As String, _
    ByVal cchBuffer As Long) As Long
Private Declare Function ShellExecute Lib "shell32.dll" 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

Private Const MAX_PATH = 260&
Private Const SW_HIDE = 0&

Private Sub prcPrint_PDF()
    Dim strPath As String, strShortPath As String, strFile As String
    strFile = "Test.pdf"
    strPath = "c:\temp\"
    strShortPath = Space(MAX_PATH)
    GetShortPathName strPath & strFile, strShortPath, MAX_PATH
    ShellExecute Me.hWnd, "print", strShortPath, vbNullString, strPath, SW_HIDE
End Sub

------------------
Gruß
Nepumuk

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

---

Hallo Nepumuk,

das funzt ja schon ganz gut. Kann ich da noch ein paar einstellungen machen, wie z.B.
-Drucker auswählen (oder wird immer der standrad Drucker genommen?)
-Welche Seite ausgedruckt wird
-Blattformat
u.s.w.
ach ja, das Fenster vom Acrobat bleibt offen. Wie kann ich das dann noch schließen???

------------------

cu
Heiko

Schau mal rein www.mertens-bb.de

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

---

Hallo Heiko,

den Drucker musst du über einen eigenen Dialog vorher auswählen. Da würde sich das "Microsoft Common Dialog Control" anbieten. Schließen des Readers entweder mit WMI oder API, was dir lieber ist (Du darfst dir eins aussuchen). Nur eine bestimmte Seite auswählen funktioniert so nicht. Da müsstest du die Vollversion von Acrobat haben, nicht nur der Reader.

------------------
Gruß
Nepumuk

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

---

Ich hatte das mal mit der pdf.ocx von Acrobat Reader 5.0 versucht, da gibt es auch die Möglichkeiten gotofirstpage und gotolastpage u.s.w. Da habe ich auch nur den reader und nicht die Vollversion...

------------------

cu
Heiko

Schau mal rein www.mertens-bb.de

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

---

Hallo Heiko,

da habe ich keine Erfahrung. Die Internetseite von Adobe gibt auch nichts her. Ich weiß jetzt nicht weiter. :-(

------------------
Gruß
Nepumuk

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

---

Naja, da gibt es wohl nur noch versuchen... Trotzdem danke.
Hab da aber noch eine Frage. Jetzt kann ich die Einstellungen am Drucker vornehmen. Aber nur an dem Standard Drucker. Wie kann ich denn einen Drucker als Standrad angeben???

------------------

cu
Heiko

Schau mal rein www.mertens-bb.de

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

---

Hallo Heiko,

das findest du hier: http://www.activevb.de/tipps/vb6tipps/tipp0093.html

------------------
Gruß
Nepumuk

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

---

Also der Tipp von Active.vb funktioniert unter W2K mit VB6 nicht und der andere Code, der unten angeblich hier funktionieren soll, meldet bei mir

Benutzerdefinierter Typ nicht definiert

bei folgendem Code:

Private cSetPrinter As New cSetDfltPrinter

Fehlt da bei mir vielleicht noch ein Verweis???

------------------

cu
Heiko

Schau mal rein www.mertens-bb.de

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