Mapear unidad mediante directiva local

Hola,
He encontrado un srcript para conectar unidades de red mediante una
directiva local.
Tengo un servidor con windows 2008 y clientes con Windows Xp y Vista. En
los
equipos con XP no tengo ningun problema, se conecta la unidad, pero en los
Vista no funciona.
A ver si alguien me puede echar un mano.
El script es el siguiente:

Option Explicit
Dim oNet, sUser, startTime

On Error Resume Next

' Objeto Red
Set oNet = CreateObject("WScript.Network")

' Obtenemos el login de usuario. En Windows 9x, el usuario puede no estar
todavía autentificado
' cuando el script comienza a ejecutarse; En ese caso reitera cada 1/2
segundo
sUser = oNet.UserName 'En minúsculas

startTime = Now
Do While sUser = ""
If DateDiff("s", startTime, Now) > 600 Then Wscript.Quit
Wscript.Sleep 500
sUser = oNet.UserName
Loop

' Mapeado de la unidad U particular de cada usuario

oNet.RemoveNetworkDrive "U:"
oNet.MapNetworkDrive "U:", "\\server2008\usuarios\" & sUser



Muchas gracias
Un saludo