Forum
herkese iyi günler
şirket içinde domain kurulu bir yapıya sahibim.
Ben şirket içine bir file server kurdum ama bunu tüm clientlere otomatik map nasıl yapıcam.
Bu konuda elinde döküman olan arkadaşlar yardımcı olursa sevinirim.
Tüm clientlar logon olduğunda bu otomatik map çalışsın.
gpo adan bir takım ayarlar vardı fakat unuttum.iyi çalışmalar herkese
http://www.cozumpark.com/forums/thread/22037.aspx inceler misiniz?
Ek olarak http://www.cozumpark.com/forums/thread/6471.aspx bu linki incelemenizdede fayda var.
Merhabalar,
Scripti versek işinizi görür mü?
Set oNet = WScript.CreateObject("WScript.Network")
set wscr=WScript.CreateObject("WScript.Shell")
usrnm=UCASE(oNet.username)
pcnm=UCASE(oNet.computername)
set usrnm = GetObject("WinNT://" & pcnm & "/" & usrnm)
Set oDrv = oNet.EnumNetworkDrives
rem Tum freezone kullanicilari icin
select case usrnm.name : rem Eğer freezone silinip tum kullanicilere uygulacaksa bu satiri silin
case "freezone" : rem Eğer freezone silinip tum kullanicilere uygulacaksa bu satiri silin
if oDrv.item(i)="X:" then oNet.RemoveNetworkDrive "X:"
oNet.MapNetworkDrive "X:", "\\server\progam ismi"
end select : rem Eğer freezone silinip tum kullanicilere uygulacaksa bu satiri silin
rem Muhasebe,Pazarlama ve Satış grubu MAPleri
for each group in usrnm.Groups
select case group.name
case "Pazarlama"
if oDrv.item(i)="P:" then oNet.RemoveNetworkDrive "P:"
oNet.MapNetworkDrive "P:", "\\SERVER\PAZARLAMA"
case "Muhasebe"
if oDrv.item(i)="M:" then oNet.RemoveNetworkDrive "M:"
oNet.MapNetworkDrive "M:", "\\SERVER\MUHASEBE"
case "Satis"
if oDrv.item(i)="S:" then oNet.RemoveNetworkDrive "S:"
oNet.MapNetworkDrive "S:", "\\SERVER\SATIS"
end select
next
net use ile istediğiniz bat file oluşturun bu file netlogon içine kopyalayın
user profile logon script kısmına bu file tam adını yazın
yada gpo ile startup script kısmına ekleyin