PDA

Vollständige Version anzeigen : pdf-Dateien aus Access heraus öffnen


André
27.10.2000, 17:07
hallo,
ich möchte Adobe Acrobat (pdf) Dateien aus Access heraus mit einem Button öffnen. Weiß jemand wie?

Günther Kramer
27.10.2000, 17:15
Hallo André,

folgender Code sollte Dir helfen:

Private Sub Datei_Anzeigen_Click()
On Error GoTo Err_Datei_Anzeigen_Click

Dim H_Ret As Long

H_Ret = ShellExecute(Me.Hwnd, vbNullString, Me![Datei], vbNullString, vbNullString, 1)

Exit_Datei_Anzeigen_Click:
Exit Sub

Err_Datei_Anzeigen_Click:
MsgBox Err.Description
Resume Exit_Datei_Anzeigen_Click

End Sub

Folgende Anweisung muß noch in ein Modul:

Public 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