Highlights
All Snippets
Top 100 Snippets
Librarians
gbCodeLib

By Language
VB6
JavaScript
Perl
HTML
SQL
Java
DOS

GBIC >> Source Code >> Visual Basic >> Snippet

Open Window at folder


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
Public Const SW_Restore = 1

Dim iRet As Long
iRet = ShellExecute( Me .hwnd, "Open" , FolderName, vbNullString, vbNullString, SW_Restore)