Opening a Folder in Network Drive [Resolved]

Hi VB Experts,

I've been trying to find a code that can open a folder in a network drive.

The function is similar to by typing the UNC path (ie. "\\servername\shared") and clicking OK from the Windows Start > Run menu.

FYI, the network drive is automatically mapped during log on.

I need this code to run a small program to open shared network folders instead of typing the path on the run menu everytime.

Thanks in advance!

Richard

VB Code:

Option Explicit
 
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
 
Public Const SW_SHOWNORMAL = 1
 
Public Sub Main()
 
    ShellExecute vbNull, vbNullString, "\\ServerName\ShareName", vbNullString, vbNullString, SW_SHOWNORMAL
 
End Sub

First of all, do you know how to open the folders of your own harddrive using Visual Basic? Using Shell() won't work cause it only opens applications or files. But if you can figure out how to open folders of your own harddrive using a program, then you should be able to open a folder using a network path rather than using a local directory path. Would be interesting to know though.
Experts anyone?

Who knew that the ShellExecute API would open directories as well as files. Good job!!!

Hi RobDog888,

Thanks a million. It works like a dream. :)

i'm late again...

using RobDog888's code and knowing that the folder is already mapped (as you mentioned) then do:

Code:

---

Shell "C:\WINNT\explorer.exe X:\", vbMaximizedFocus

---

where X:\ is the mapped drive

i just like to clear up RobDog's way is to use API, what I posted just used the explorer windows' provided for us (this is for Jacob Roman's question) ;)

No prob.

:cool: