none
Script para environment RRS feed

  • Pregunta

  •  

    Hola, me gustaria por favor que me ayudarais para hacer un script, tengo que poner en el environment de una lista de usuarios que cuando hagan logon arranquen una determina ruta donde tengo un programa, y es una lista de 250 usuarios, me podriais ayudar por favor?

     

    Muchas gracias

    viernes, 28 de diciembre de 2007 14:08

Respuestas

  • Hola, muchas gracias por la explicacion,

    1. Creo el grupo con los usuarios.
    2. En el script donde tengo la comillas " Grupo" es donde pongo el nombre del grupo.
    3. Lanzo el script en el domain controler.
    4. En todos los usuarios en la pestaña de Environment, tendria el programa que he puesto en el recurso del servidor.

    Esto es asi no?, quiero que cuando acceden por Terminal Server los usuarios les arranque directamente el programa que yo les ponga en el environment, no se si me explicado, y disculpa las molestias por tantas preguntas

    Muchas gracias por toda la ayuda
    lunes, 31 de diciembre de 2007 7:45

Todas las respuestas

  • Hola,

     

    lo mas facil seria crear un grupo que tendria los 250 miembros !

     

    En el logon script, se puede comprobar la pertenencia al grupo con el comando "IFMEMBER" o con un Vbscript.

     

    Un pequeño ejemplo:

    Bloque de código

    ON ERROR RESUME NEXT
    set WshShell = CreateObject("WScript.Shell")
    Set WshNetwork = WScript.CreateObject("WScript.Network")


    DomainName=WshShell.RegRead("HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\MSNP32\NetworkProvider\AuthenticatingAgent")
    Set UserObj = GetObject("WinNT://" & DomainName & "/" & WshNetwork.username)


    'Init Groups
    Dim UserGroups
    Dim GroupObj
    UserGroups=""
    For Each GroupObj In UserObj.Groups
      UserGroups=UserGroups & "[" & GroupObj.Name & "]"
    Next

    wscript.echo "Membre de "&UserGroups

    if InGroup("Grupo") then
      WshNetwork.MapNetworkDrive "R:","\\Servidor\compartido"


    end if


    '
    Function InGroup(strGroup)
     InGroup=False
     If InStr(UserGroups,"[" & strGroup & "]") Then
       InGroup=True
     End If
    End Function

     

     

    Un saludo.

    viernes, 28 de diciembre de 2007 22:04
  • Hola, muchas gracias por la explicacion,

    1. Creo el grupo con los usuarios.
    2. En el script donde tengo la comillas " Grupo" es donde pongo el nombre del grupo.
    3. Lanzo el script en el domain controler.
    4. En todos los usuarios en la pestaña de Environment, tendria el programa que he puesto en el recurso del servidor.

    Esto es asi no?, quiero que cuando acceden por Terminal Server los usuarios les arranque directamente el programa que yo les ponga en el environment, no se si me explicado, y disculpa las molestias por tantas preguntas

    Muchas gracias por toda la ayuda
    lunes, 31 de diciembre de 2007 7:45