Map local drive/subst command in VBS script?

[profit10]

Hi,

 

I need to map a drive letter to a local path on the computer. For example, Z: drive points to c:\very\long\path.

 

I can do this using the subst command but I need a way to do it using my vbs logon script.

 

If anyone can help at all I would very much appreciate it.

 

Thanks.

[TLARWise]

Dim objShell, strDrive, strPath

Set objShell = CreateObject("WScript.Shell")

strDrive = "Z:"

strPath = """c:\very\long\path"""

objShell.Run "cmd /c SUBST " & strDrive & " " & strPath, 1, True

[profit10]

Thanks for your reply. I've left work now so will give this a try on Monday!