Suchen-Dialog des Windows-Explorers aufrufen Mit der ShellExecute-API lässt sich mal eben schnell der Suchen-Dialog des Windows-Explorers öffnen.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  22.410
https://www.tools4vb.com	System:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 14 Bewertung insgesamt: sehr gut Durchschnittliche Bewertung: 4.5 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Mit Hilfe der ShellExecute-Funktion aus dem Windows-API lässt sich mal eben schnell der Suchen-Dialog des Windows-Explorers öffnen. Optional kann man sogar festlegen, welches Verzeichnis als Start-Ordner für die Suche verwendet werden soll.

Option Explicit
 
' benötigte API-Deklarationen
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 SW_SHOWNORMAL = 1
Private Const SW_SHOWMINIMIZED = 2
Private Const SW_SHOWMAXIMIZED = 3

Beispiel 1:

' Suchen-Dialog mit aktuellen Verzeichnis als 
' Start-Ordner aufrufen
ShellExecute Me.hWnd, "find", "", "", "", SW_SHOWNORMAL

Beispiel 2:

' Suchen-Dialog mit gezielter Verzeichnisvorgabe 
' maximiert starten
ShellExecute Me.hWnd, "find", "d:\temp", "", "", SW_SHOWMAXIMIZED