Tipp 10.2 - Dateiliste erweitern

Wie kann ich die Dokumentenliste im Startmenü erweitern?

Mit dieser Funktion können Sie einen Dateiauswahldialog aufrufen. Kopieren Sie einfach nachfolgenden Quellcode in die Zwischenablage und fügen Sie anschließend den Inhalt der Zwischenablage in ein neues Modul ein. Die Aufrufparameter finden Sie im Quellcode beschrieben.

Api-AufrufeVerwendete Win32-Api-Aufrufe und Typen: SHAddToRecentDocs

Beispiel:

Option Explicit
 
Declare Function SHAddToRecentDocs Lib "shell32.dll" _
                (ByVal dwFlags As Long, _
                 ByVal dwData As String) As Long
 
Public Function AddToRecentDocuments _
               (sFilePath As String) As Long
'// --------------------------------------------------------
'// Methode:   | Fügt ein Dokument der Dokumentenliste in
'//            | der Startleiste hinzu (recent list)
'// --------------------------------------------------------
'// Parameter: | sFilePath = gültiger Dateipfad
'// --------------------------------------------------------
'// Rückgabe:  | Long-Wert der API-Funktionsrückgabe
'// --------------------------------------------------------
'// Autor:     | Stefan Kulpa
'//            | EDV Innovation & Consulting - Dormagen
'// --------------------------------------------------------
    On Error Resume Next
    Const SHARD_PATH As Long = &H2&
    AddToRecentDocuments = _
    SHAddToRecentDocs(SHARD_PATH, sFilePath)
 
End Function