Home All Groups Group Topic Archive Search About

Open Window Explorer in "My Documents" or other Special Fodlers"

Author
4 Jun 2005 5:52 PM
Robert
How does one open Windows Explorer to the Selected Special folder.
Ex My Documents, My Music, Temporary Internet Files etc.

--
Thanks in advance
Robert
rober***@nas.net

Author
4 Jun 2005 6:02 PM
Jim Edgar
"Robert" <rober***@nas.net> wrote in message
news:Ol%23K94SaFHA.228@TK2MSFTNGP12.phx.gbl...
> How does one open Windows Explorer to the Selected Special folder.
> Ex My Documents, My Music, Temporary Internet Files etc.
>
> --
> Thanks in advance
> Robert
> rober***@nas.net
>
>
Something like this:

explorer.exe ,/e,/n, "My Documents"

Works OK on XP but I haven't tried it on 2K, etc...

Jim Edgar
Author
4 Jun 2005 7:04 PM
Larry Serflaten
"Robert" <rober***@nas.net> wrote

> How does one open Windows Explorer to the Selected Special folder.
> Ex My Documents, My Music, Temporary Internet Files etc.


See if these have what you need:

LFS

Private Const sysAdminTools = sysControlPanel & "\::{D20EA4E1-3957-11d2-A40B-0C5020524153}"
Private Const sysComputer = ", ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}"
Private Const sysConnections = sysControlPanel & "\::{7007ACC7-3202-11D1-AAD2-00805FC1270E}"
Private Const sysControlPanel = sysComputer & "\::{21EC2020-3AEA-1069-A2DD-08002B30309D}"
Private Const sysDesktop = sysComputer & " /select,"
Private Const sysDocuments = ", ::{450D8FBA-AD25-11D0-98A8-0800361B1103}"
Private Const sysFax = sysDocuments & "\Fax"
Private Const sysFonts = sysControlPanel & "\::{D20EA4E1-3957-11d2-A40B-0C5020524152}"
Private Const sysIExplorer = ", ::{871C5380-42A0-1069-A2EA-08002B30309D}"
Private Const sysNetworkPlaces = ", ::{208D2C60-3AEA-1069-A2D7-08002B30309D}"
Private Const sysPictures = sysDocuments & "\My Pictures"
Private Const sysPrinters = sysControlPanel & "\::{2227A280-3AEA-1069-A2DE-08002B30309D}"
Private Const sysRecycleBin = ", ::{645FF040-5081-101B-9F08-00AA002F954E}"
Private Const sysTasks = ", ::{D6277990-4C6A-11CF-8D87-00AA0060F5BF}"


Private Sub Form_Load()
    Shell "explorer " & sysDocuments, vbNormalFocus
End Sub