Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

Problem im Access mit dem öffnen von Pfaden via VB





Frage

Hallo, Folgendes Problem: Ich habe ein Formular erstellt, welches mir verschiedne Werte aus der Tabelle übernimmt.. --> unter anderem "Filename mit Pfad". Mein Problem ist nun, dass ich mit einer Befehlsschaltfläche den angegebenen Pfad öffnen sollte. Habe der Befehlsschaltfläche bereits die Anwendung "Adobe Acrobar" hinterlegt da ich nur PDS's öffnen muss. Ich sollte jedoch der Schaltfläche noch den Pfad hinterlegen, (welcher in jedem Datensatz variiert) sodas sich der angegebene Pfad mit Adobe Acrobat via Mausklick öffnet. Zur Hilfe: Bisher als Script hinterlegt: Private Sub Öffnen_Click() On Error GoTo Err_Öffnen_Click Dim stAppName As String stAppName = "C:\Programme\Adobe\Acrobat 7.0\Acrobat\Acrobat.exe" Call Shell(stAppName, 1) Exit_Öffnen_Click: Exit Sub Err_Öffnen_Click: MsgBox Err.Description Resume Exit_Öffnen_Click End Sub Danke im voraus Gruß

Antwort 1 von Teerbaby

naja, jetzt hängst du an das stAppname einfach noch den Pfad und Namen der Datei dran - d.h. "...Acrobat.exe z:\pfad\datei.pdf"

Antwort 2 von chillah

Danke für die schnelle Antwort

Soweit bin ich auch gekommen. Mein Problem ist nur das, dass der Dateipfad je nach Datensatz variiert und ich immer den im Formular angegebenen Pfad öffnen möchte.
Und daher einen allgemeinen Befehl benötige der mir den Wert aus dem Fromular ausliest.

Gruß

Antwort 3 von Teerbaby

Das kommt ein bisschen darauf an, in was für einem Steuerelement das angezeigt wird. Für ein Textfeld sieht das in etwa so aus:
Me.NamedesFeldes.Text


Das Me (Formular in dem du den Code hinterlegst) kannst du auch weglassen.

Antwort 4 von chillah

Ich hätte eher an eine Lösung gedacht mit dem Wert auslesen.

Ich habe ja ein Formular das Daten aus einer Tabelle ausließt.

Und mit dem Button (Befehlsschaltfläche) sollte ich hinter der Anwendung "Acrobat" noch einen Pfad angeben der variiert. Dieser Pfad ist ja der Wert aus dem Formularfeld und auf diesen Wert (Value) will ich losgehen.

Eigentlich muss ich nur, statt dem hier angegebenen Pfad einen Befehlt angeben, der den Wert aus dem Folmularfeld wählt. (In meinem Fall "FileName mit Pfad".

stAppName = "C:\Programme\Adobe\Acrobat 7.0\Acrobat\Acrobat.exe I:\DATENBANKEN\Test Thomas\test1.pdf"
Call Shell(stAppName, 1)


Gruß