none
Mapeamento de Rede Vbscript RRS feed

  • Pergunta

  •  

    Boa Tarde gostaria de saber se alguem conhece algum script que mapeia unidade de rede  definido po OU

     

    Ex.

     

    Os usuarios da Ou " TESTE"  mapeia a unidade  J: 

     

    Os usuarios da OU "TESTE2" mapeia a unidade X:  e assim por diante

     

     

    No Aguardo

    quinta-feira, 27 de setembro de 2007 17:39

Respostas

Todas as Respostas

  • Diego,

     

    Voce pode criar uma bat para mapear as unidades e aplicar essa bat na gpo de cada OU para executar assim que os usuarios efetuar o logon

     

    script da bat

    net use J: \\servidor\compartilhamento

     

     

    se este poste ajudou marque com util

     

    quinta-feira, 27 de setembro de 2007 19:24
  • Post movido para área Scripts Administrativos.

     

    Favor, postar na próxima vez na área correspondente ao produto para facilitar a pesquisa de outros membros da comunidade e para que você possa obter as respostas de forma mais rápida.

     

    Agradecemos a sua compreensão.

    sábado, 29 de setembro de 2007 14:32
  • Diego, dê uma olhada no link abaixo, já existe uma resposta para a sua pergunta.

     

    http://forums.microsoft.com/technet-br/showpost.aspx?postid=2213513&siteid=29

     

    segunda-feira, 1 de outubro de 2007 13:08
  • Vc pode colocar o script abaixo em um aquivo vbs e definir para qual usuario ou grupo deve ser definido o mapeamento proposto pelo script

    nesse script vc pode definir ate dois mapeamentos mas com um simples alteração vc pode acrecentar mais mapeamentos .Rode o script no logon  .

    Dim objShell, objShell2, objShell3, objDesktop, objLink, objLink2, objLink3 
    Dim strHFPath, strWorkDir, strIconPath 
    Dim strAdministratiePath 
    Dim strIedereenPath 
     
     
    'initialiseren 
    strDriveLetter = "J:" 
    strRemotePath = "\\debrfsba1\deptos\IT\Service Desk\Procedimentos" 
    strDriveLetter2 = "O:" 
    strRemotePath2 = "\\debrfsba1\deptos\IT\Scanner" 
    Set objNetwork = CreateObject("WScript.Network") 
    set objNetwork2 = CreateObject("WScript.Network") 
     
     
    ' uitvoeren 
    objNetwork.MapNetworkDrive strDriveLetter, strRemotePath 
    objNetwork2.MapNetworkDrive strDriveLetter2, strRemotePath2 
    

     


    Denis Faustino
    quarta-feira, 6 de julho de 2011 02:42