Mapear unidad de red

27/04/2009 - 10:36 por Juanjo | Informe spam
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

Preguntas similare

Leer las respuestas

#1 Javier Inglés [MS MVP]
27/04/2009 - 10:58 | Informe spam
Si tienes un 2008 Server, por qué en lugar de usar un scrip de inicio de
sesión no usas mejor las Group Policy Preferences donde puedes hacer de
forma muy sencilla el mapeo de la unidad de red??

Lo único es que los XP deben tener instalado el complemento para poder
preocesarlos

Group Policy Preference Client Side Extensions for Windows XP (KB943729)
http://www.microsoft.com/downloads/...laylang=en

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
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
Respuesta Responder a este mensaje
#2 Juanjo
27/04/2009 - 17:38 | Informe spam
Gracias Javier.
He hecho lo que me has dicho, pero sigo con los mismos problema, en XP
funciona pero en Vista no.
Pensaba que podia ser que no estuvieran validando bien en el dominio, y he
forzado el cambio de contraseña en el inicio de sesion, lo ha pedido
correctamente.
Se te ocurre algo mas por lo que no este funcionando?

Gracias.

"Javier Inglés [MS MVP]" wrote:

Si tienes un 2008 Server, por qué en lugar de usar un scrip de inicio de
sesión no usas mejor las Group Policy Preferences donde puedes hacer de
forma muy sencilla el mapeo de la unidad de red??

Lo único es que los XP deben tener instalado el complemento para poder
preocesarlos

Group Policy Preference Client Side Extensions for Windows XP (KB943729)
http://www.microsoft.com/downloads/...laylang=en

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
> 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



Respuesta Responder a este mensaje
#3 Javier Inglés [MS MVP]
28/04/2009 - 08:30 | Informe spam
Estás estableciendo la GPO a nivel de máquina o de usuario? El mapeo debe
ser a nivel de usuario.

A parte, revisa el visor de eventos del Vista para ver si hay algo que se
pueda mirar.

Repasa el tema depermisos igualmente; a un mismo usuario le gfunciona en XP
y en Vista no? Si es así, se supone quie no es tema de permisos, por lo que
necesitaremos ver si hay algo en el visor de eventos; a parte, en el Vista
en tiendo que como único DNS (o DNSs) que aparece es el del DC y ningún otro
más.

Si llevas algún Firewall o antivirus que incorpore algún firewall propio,
revisa que no interfiera tampoco

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
Gracias Javier.
He hecho lo que me has dicho, pero sigo con los mismos problema, en XP
funciona pero en Vista no.
Pensaba que podia ser que no estuvieran validando bien en el dominio, y he
forzado el cambio de contraseña en el inicio de sesion, lo ha pedido
correctamente.
Se te ocurre algo mas por lo que no este funcionando?

Gracias.

"Javier Inglés [MS MVP]" wrote:

Si tienes un 2008 Server, por qué en lugar de usar un scrip de inicio de
sesión no usas mejor las Group Policy Preferences donde puedes hacer de
forma muy sencilla el mapeo de la unidad de red??

Lo único es que los XP deben tener instalado el complemento para poder
preocesarlos

Group Policy Preference Client Side Extensions for Windows XP (KB943729)
http://www.microsoft.com/downloads/...laylang=en

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
> 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



Respuesta Responder a este mensaje
#4 Juanjo
28/04/2009 - 08:53 | Informe spam
Hola Javier,

Muchas gracias por tu interes, al final lo solucioné, era culpa mia, tenia
mal los permisos de la carpeta Usuario. El tema era que los XP conectaban la
unidad, pero no me habia dado cuenta que no daba acceso. En los Vista
directamente no se conectaba, por eso pensaba que el problema estaba en le
Windows Vista.

Muchas gracias por todo.

"Javier Inglés [MS MVP]" wrote:

Estás estableciendo la GPO a nivel de máquina o de usuario? El mapeo debe
ser a nivel de usuario.

A parte, revisa el visor de eventos del Vista para ver si hay algo que se
pueda mirar.

Repasa el tema depermisos igualmente; a un mismo usuario le gfunciona en XP
y en Vista no? Si es así, se supone quie no es tema de permisos, por lo que
necesitaremos ver si hay algo en el visor de eventos; a parte, en el Vista
en tiendo que como único DNS (o DNSs) que aparece es el del DC y ningún otro
más.

Si llevas algún Firewall o antivirus que incorpore algún firewall propio,
revisa que no interfiera tampoco

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
> Gracias Javier.
> He hecho lo que me has dicho, pero sigo con los mismos problema, en XP
> funciona pero en Vista no.
> Pensaba que podia ser que no estuvieran validando bien en el dominio, y he
> forzado el cambio de contraseña en el inicio de sesion, lo ha pedido
> correctamente.
> Se te ocurre algo mas por lo que no este funcionando?
>
> Gracias.
>
> "Javier Inglés [MS MVP]" wrote:
>
>> Si tienes un 2008 Server, por qué en lugar de usar un scrip de inicio de
>> sesión no usas mejor las Group Policy Preferences donde puedes hacer de
>> forma muy sencilla el mapeo de la unidad de red??
>>
>> Lo único es que los XP deben tener instalado el complemento para poder
>> preocesarlos
>>
>> Group Policy Preference Client Side Extensions for Windows XP (KB943729)
>> http://www.microsoft.com/downloads/...laylang=en
>>
>> Salu2!!
>> Javier Inglés
>> https://mvp.support.microsoft.com/p...B5567431B0
>> MS MVP, Windows Server-Directory Services
>>
>>
>>
>> "Juanjo" escribió en el mensaje
>> news:
>> > 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
>>
>>
>>



Respuesta Responder a este mensaje
#5 Javier Inglés [MS MVP]
28/04/2009 - 11:53 | Informe spam
:-)

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
Hola Javier,

Muchas gracias por tu interes, al final lo solucioné, era culpa mia, tenia
mal los permisos de la carpeta Usuario. El tema era que los XP conectaban
la
unidad, pero no me habia dado cuenta que no daba acceso. En los Vista
directamente no se conectaba, por eso pensaba que el problema estaba en le
Windows Vista.

Muchas gracias por todo.

"Javier Inglés [MS MVP]" wrote:

Estás estableciendo la GPO a nivel de máquina o de usuario? El mapeo debe
ser a nivel de usuario.

A parte, revisa el visor de eventos del Vista para ver si hay algo que se
pueda mirar.

Repasa el tema depermisos igualmente; a un mismo usuario le gfunciona en
XP
y en Vista no? Si es así, se supone quie no es tema de permisos, por lo
que
necesitaremos ver si hay algo en el visor de eventos; a parte, en el
Vista
en tiendo que como único DNS (o DNSs) que aparece es el del DC y ningún
otro
más.

Si llevas algún Firewall o antivirus que incorpore algún firewall propio,
revisa que no interfiera tampoco

Salu2!!
Javier Inglés
https://mvp.support.microsoft.com/p...B5567431B0
MS MVP, Windows Server-Directory Services



"Juanjo" escribió en el mensaje
news:
> Gracias Javier.
> He hecho lo que me has dicho, pero sigo con los mismos problema, en XP
> funciona pero en Vista no.
> Pensaba que podia ser que no estuvieran validando bien en el dominio, y
> he
> forzado el cambio de contraseña en el inicio de sesion, lo ha pedido
> correctamente.
> Se te ocurre algo mas por lo que no este funcionando?
>
> Gracias.
>
> "Javier Inglés [MS MVP]" wrote:
>
>> Si tienes un 2008 Server, por qué en lugar de usar un scrip de inicio
>> de
>> sesión no usas mejor las Group Policy Preferences donde puedes hacer
>> de
>> forma muy sencilla el mapeo de la unidad de red??
>>
>> Lo único es que los XP deben tener instalado el complemento para poder
>> preocesarlos
>>
>> Group Policy Preference Client Side Extensions for Windows XP
>> (KB943729)
>> http://www.microsoft.com/downloads/...laylang=en
>>
>> Salu2!!
>> Javier Inglés
>> https://mvp.support.microsoft.com/p...B5567431B0
>> MS MVP, Windows Server-Directory Services
>>
>>
>>
>> "Juanjo" escribió en el mensaje
>> news:
>> > 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
>>
>>
>>



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida