referencing explorer.exe considering different OS's 1

[AndyHorn]

Hi,

How would I go about referencing windows explorer in VBA for a multi operating system environment? The problem being that explorer lives in C:\WINNT\ on Win2K and in C:\WINDOWS on WinXP.

The code I am currently using is:

Private Sub CmdOpenBrochureDir_Click()

On Error GoTo Err_CmdOpenBrochureDir_Click

Dim stAppName As String

stAppName = "C:\WINDOWS\explorer.exe S:\DirectoryName"
Call Shell(stAppName, 1)

Exit_CmdOpenBrochureDir_Click:
Exit Sub

Err_CmdOpenBrochureDir_Click:
MsgBox err.Description
Resume Exit_CmdOpenBrochureDir_Click

End Sub

I've tried replacing C:\WINDOWS\explorer.exe with, %SystemRoot%\explorer.exe, but it says file not found.

Any ideas?

Thanks

 

[Crowley16]

assuming that the path is already setup by the os itself, then surely just "explorer" would do...?

--------------------
Procrastinate Now!

 

[earthandfire]

Since Explorer.exe is in the system path all you need is for example

Shell "Explorer.exe C:\", vbMaximizedFocus

Hope this helps.

 

[earthandfire]

Sorry Crowley, I was testing as you were posting

 

[Crowley16]

lol, you have to be on your toes in here...

--------------------
Procrastinate Now!

 

[earthandfire]

I though I'd sneak in while you were busy in TTUK, but you were still too quick

 

[AndyHorn]

Indeed it was that simple Crowley16. Have a star.

Thanks