none
Posição de Código no Script RRS feed

  • Pergunta

  • Boa tarde,

    Possuo o seguinte script:

    On Error Resume Next

    Set objNet = CreateObject("Wscript.Network")
    Set oDrives = objNet.EnumNetworkDrives

    For i = 0 to oDrives.Count -1 Step 2
       objNet.RemoveNetworkDrive oDrives.Item(i), true, true
    Next

    Set objSysInfo = CreateObject("ADSystemInfo")
    Set objNetwork = CreateObject("Wscript.Network")

    strUserPath = "LDAP://" & objSysInfo.UserName
    Set objUser = GetObject(strUserPath)

    WshShell.Run ("net time \\CLSRV052 /set /y"), 0, TRUE

    For Each strGroup in objUser.MemberOf
        strGroupPath = "LDAP://" & strGroup
        Set objGroup = GetObject(strGroupPath)
        strGroupName = objGroup.CN
       
        Select Case strGroupName
        Case "G_CL_Rh"
            objNetwork.MapNetworkDrive "P:", "\\CLSRV005\RH"
        Case "G_CL_Consultas-Ofertas_Full"
            objNetwork.MapNetworkDrive "R:", "\\CLSRV004\CONSULTAS_OFERTAS"
        Case "G_CL_Tecwin"
            objNetwork.MapNetworkDrive "W:", "\\CLSRV030\TECWIN"
    End Select
    Next

     

    Dúvida:

    A função que remove todos os mapeamentos existentes esta no lugar correto?

    A função que da um "set" na hora com o servidor esta no lugar correto tambem?

    E uma outra coisa, gostaria que quando esse script rodasse em minha rede, aparecesse para o usuário uma mensagem do tipo, "aguarde enquanto os drivers de rede são mapeados" e quando o script terminasse, aparecesse a mensagem "drivers mapeados com sucesso", só para o usuário não sair clicando em meu computador e reclamar que os drivers não foram carregados, pois esse script ai é só um pedaço dele.

    Se alguem souber de algo, agradeço.

     

    Obrigado.


    quarta-feira, 18 de janeiro de 2012 17:04

Respostas

  •  

    Dúvida:

    A função que remove todos os mapeamentos existentes esta no lugar correto? Sim, bem no ínicio antes de mapear os drives.

    A função que da um "set" na hora com o servidor esta no lugar correto tambem? Eu colocaria no ínico, onde está já está bom.

    E uma outra coisa, gostaria que quando esse script rodasse em minha rede, aparecesse para o usuário uma mensagem do tipo, "aguarde enquanto os drivers de rede são mapeados" e quando o script terminasse, aparecesse a mensagem "drivers mapeados com sucesso", só para o usuário não sair clicando em meu computador e reclamar que os drivers não foram carregados, pois esse script ai é só um pedaço dele.

    Não aconselho colocar mensagens, se vc utiliza windows xp ou superior na sua rede então desabilite o fastlogon, o fastlogon as vezes é tão fast que o usuário loga e o serviço de rede ainda não subiu, então os scripts não executam.

    Ref.:

    Description of the Windows XP Professional Fast Logon Optimization feature

    http://support.microsoft.com/kb/305293/en-us


    Fábio de Paula Junior
    quarta-feira, 18 de janeiro de 2012 17:20
    Moderador

Todas as Respostas

  •  

    Dúvida:

    A função que remove todos os mapeamentos existentes esta no lugar correto? Sim, bem no ínicio antes de mapear os drives.

    A função que da um "set" na hora com o servidor esta no lugar correto tambem? Eu colocaria no ínico, onde está já está bom.

    E uma outra coisa, gostaria que quando esse script rodasse em minha rede, aparecesse para o usuário uma mensagem do tipo, "aguarde enquanto os drivers de rede são mapeados" e quando o script terminasse, aparecesse a mensagem "drivers mapeados com sucesso", só para o usuário não sair clicando em meu computador e reclamar que os drivers não foram carregados, pois esse script ai é só um pedaço dele.

    Não aconselho colocar mensagens, se vc utiliza windows xp ou superior na sua rede então desabilite o fastlogon, o fastlogon as vezes é tão fast que o usuário loga e o serviço de rede ainda não subiu, então os scripts não executam.

    Ref.:

    Description of the Windows XP Professional Fast Logon Optimization feature

    http://support.microsoft.com/kb/305293/en-us


    Fábio de Paula Junior
    quarta-feira, 18 de janeiro de 2012 17:20
    Moderador
  • Fabio

    Eu utilizo apenas Windows 7. Nesse caso, vc recomenda que eu deixe habilitado o fastlogon ou não?

     

    Obrigado.

    quarta-feira, 18 de janeiro de 2012 17:57
  • Desabilite o fastlogon


    Fábio de Paula Junior
    quarta-feira, 18 de janeiro de 2012 18:45
    Moderador