Criar mapeamento automatico no logon do usuário 2003

Postar o script em C:\WINDOWS\SYSVOL\sysvol\DOMINIO\scripts
Após vincular no logon do usuário.

Se tiver redirecionamento de pastas lembrar de desmontar os mapeamentos no logoff

Exemplo de script para montar um mapeamento automático no windows server 2003 e renomear, colocando na área de trabalho.

@echo off
net use z: \\abratel-server2\setups
echo Set oShell = CreateObject(“Shell.Application”) >> z:\Drive_Rename.vbs
echo oShell.NameSpace(“z:\”).Self.Name = “Setups” >> z:\Drive_Rename.vbs
echo Set oWS = WScript.CreateObject(“WScript.Shell”) >> z:\Drive_Rename.vbs
echo sLinkFile = “%userprofile%\desktop\Setups.lnk”>> z:\Drive_Rename.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> z:\Drive_Rename.vbs
echo oLink.TargetPath = “Z:\” >> z:\Drive_Rename.vbs
echo oLink.Save >> z:\Drive_Rename.vbs
z:
Drive_Rename.vbs
del Drive_Rename.vbs
net use v: \\abratel-server2\luizalberto
echo Set oShell = CreateObject(“Shell.Application”) >> v:\Drive_Rename2.vbs
echo oShell.NameSpace(“V:\”).Self.Name = “Documentos” >> v:\Drive_Rename2.vbs
echo Set oWS = WScript.CreateObject(“WScript.Shell”) >> v:\Drive_Rename2.vbs
echo sLinkFile = “%userprofile%\desktop\Documentos.lnk”>> v:\Drive_Rename2.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> V:\Drive_Rename2.vbs
echo oLink.TargetPath = “v:\” >> V:\Drive_Rename2.vbs
echo oLink.Save >> v:\Drive_Rename2.vbs
v:
Drive_Rename2.vbs
del Drive_Rename2.vbs

##################################
Outro exemplo
CODE
Option Explicit
Dim objNetwork
Dim strDriveLetter, strRemotePath
strDriveLetter = “J:”
strRemotePath = “\\server01\pastacompartilhada”
Set objNetwork = CreateObject(“WScript.Network”)

objNetwork.MapNetworkDrive strDriveLetter, strRemotePath
WScript.Quit

Não esqueça de criar um script de logoff para que nos proximos logons.. naum apareça erro de unidade ja criada

CODE
Option Explicit
Dim objNetwork, strDriveLetter
strDriveLetter = “H:”
Set objNetwork = CreateObject(“WScript.Network”)
objNetwork.RemoveNetworkDrive strDriveLetter
Wscript.Quit

Salve os scripts como .vbs

Deixe um comentário