VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

MiniExplorer

Morpheous  (4 Submissions)   Complete Applications   Visual Basic 5.0   Intermediate   Wed 3rd February 2021

Explorer
Includes Drag and drop from windows to listview both files and folders and back.
File System Object Information.
Command Line Switches.
Special Folder API IE(My Documents, Network Neighborhood etc)

Assumes
':....References: Make sure to include these in your project....: ' :....Visual Basic For Applications....: ' :....Visual Basic runtime objects and procedures....: ' :....OLE Automation....: ' :....Microsoft Scripting Runtime....: 'Project..References From the Main Menu Or Alt+P+N

API Declarations
Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Private Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Private Declare Function GetDesktopWindow Lib "user32" () As Long
Private Declare Function SHGetSpecialFolderLocation Lib "shell32.dll" (ByVal hWndOwner As Long, ByVal nFolder As Long, pidl As ITEMIDLIST) As Long
Private Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias "SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As Long
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 ShellExecuteEx Lib "shell32.dll" (ByRef S As SHELLEXECUTEINFO) As Long

Rate MiniExplorer (4(4 Vote))

Download MiniExplorer

MiniExplorer Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters