VBS open folder werkt niet

[MasterL]

Hallo,

Ik probeer in vbs een folder te openen alleen het werkt niet helemaal naar behoren.
Ik gebruik dit script:

Dim SH, txtFolderToOpen
Set SH = WScript.CreateObject("Shell.Application")
txtFolderToOpen = "\\ad\profiel\%username%\Mijn documenten"
SH.Open txtFolderToOpen
Set SH = Nothing

Bovenstaande werkt niet goed, deze hieronder wel:

Dim SH, txtFolderToOpen
Set SH = WScript.CreateObject("Shell.Application")
txtFolderToOpen = "\\ad\profiel\masterl\Mijn documenten"
SH.Open txtFolderToOpen
Set SH = Nothing


Het lijkt dus wel alsof het deel met %username% niet werkt? Ik ben hier helemaal niet goed
in dus ik hoop dat iemand mij verder kan helpen waarom dit niet werkt.

Alvast bedankt!

[_Thanatos_]

ExpandEnvironmentStrings is je vriend:
http://www.robvanderwoude.com/vbstech_data_environment.php

[ Voor 13% gewijzigd door _Thanatos_ op 19-09-2009 03:13 ]