Logon Script

10/11/2005 - 01:42 por Rene | Informe spam
Hola amigos,

tengo creado un script para los usuarios mediante la poliza de grupo

este debe hacer un map drive a un directorio del servidor.

El script dice lo siguiente:
Inicio Script MyScript.vbs
==Const TaxUsers_GROUP = "cn=TaxUsers"
Const AcctUser_GROUP = "cn=AcctUser"

Set wshNetwork = CreateObject("WScript.Network")
wshNetwork.MapNetworkDrive "U:", "\\Server1\Users" & wshNetwork.UserName

Set ADSysInfo = CreateObject("ADSystemInfo")
Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))

If InStr(strGroups, TaxUsers_GROUP) Then

wshNetwork.MapNetworkDrive "T:", "\\Servidor1\sys"
wshNetwork.MapNetworkDrive "S:", "\\Servidor2\Sys\Accounting"


ElseIf InStr(strGroups, Beckers_GROUP) Then

wshNetwork.MapNetworkDrive "S:", "\\Servidor2\Sys\Accounting"

End If

Fin Script

Cuando un usuario se autentifica, no se crean los directorios, que debo
hacer para que funcione?

Gracias

Saludos
Rene B.

God Bless You
 

Leer las respuestas

#1 Rene
10/11/2005 - 02:00 | Informe spam
Olvide anotar que el servidor es SBS 2003 Standar


"Rene" wrote in message
news:%
Hola amigos,

tengo creado un script para los usuarios mediante la poliza de grupo

este debe hacer un map drive a un directorio del servidor.

El script dice lo siguiente:
> Inicio Script MyScript.vbs
==> Const TaxUsers_GROUP = "cn=TaxUsers"
Const AcctUser_GROUP = "cn=AcctUser"

Set wshNetwork = CreateObject("WScript.Network")
wshNetwork.MapNetworkDrive "U:", "\\Server1\Users" & wshNetwork.UserName

Set ADSysInfo = CreateObject("ADSystemInfo")
Set CurrentUser = GetObject("LDAP://" & ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))

If InStr(strGroups, TaxUsers_GROUP) Then

wshNetwork.MapNetworkDrive "T:", "\\Servidor1\sys"
wshNetwork.MapNetworkDrive "S:", "\\Servidor2\Sys\Accounting"


ElseIf InStr(strGroups, Beckers_GROUP) Then

wshNetwork.MapNetworkDrive "S:", "\\Servidor2\Sys\Accounting"

End If

> Fin Script
>
Cuando un usuario se autentifica, no se crean los directorios, que debo
hacer para que funcione?

Gracias

Saludos
Rene B.

God Bless You

Preguntas similares