Beliebige Dateien mit dem Standard-Programm öffnen (VB)

Dateien mit Ihrem Standard-Proramm öffnen

Der Windows Explorer bzw. die Installationsprogramme der Programme weisen (fast) jeder Datei eine spezielle Anwendung zu, mit der Sie bearbeitet oder gelesen werden kann. Wenn Sie von VB aus eine Datei mit Ihrem standardmäßig verknüpften Programm öffnen wollen, müssen Sie sich mal wieder zweier API-Funktionen bedienen.

Bewertung dieses Tipps:

(bewertet von insgesamt 53 Besuchern)

Deklarationen

Um die folgenden Funktionen in eigenen Projekten nutzen zu können, müssen sie zuerst im Kopf der Form oder des Moduls deklariert werden:

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 Declare Function GetDesktopWindow Lib "user32" () As Long

Aufruf/Funktion

Nun benötigen wir noch eine kleine Routine, die das Ganze etwas komfortabler erledigt. Ich empfehle Ihnen, diese Prozedur in einem Modul zu plazieren, da sie dann projektweit verfügbar ist:

Sub OpenFile(Filename As String)
Call ShellExecute(GetDesktopWindow(), "Open", Filename, "", "C:\", 1)
End Sub

Quellen: SHADOWare.de
Letzte Änderung: 26.00