GPO'dan Paylaşım Gönderme

Script ile yapabilirsiniz. Aşağıda ki kodu .txt yapıştırın. Uzantısını .vbs yapın. İçeriği düzenleyin. GPO ile logon script olarak ekleyin.

Her ihtimale karşı test ortamınızda veya local pc'nizde deneyebilirsiniz.

rem --      Logon Script for Lydion Jewellery
rem --                     Designed by CemC
rem  on error resume next
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
for each group in usrnm.Groups
  select case group.name
  case "_Muhasebe"
      if oDrv.item(i)="N:" then oNet.RemoveNetworkDrive "N:"
     oNet.MapNetworkDrive "N:", "\\DBSERVER\NETSIS"
  case "Administrators"
      if oDrv.item(i)="K:" then oNet.RemoveNetworkDrive "K:"
      oNet.MapNetworkDrive "K:", "\\DBSERVER\COMPANY"
   case "Users"
     if oDrv.item(i)="S:" then oNet.RemoveNetworkDrive "S:"
     oNet.MapNetworkDrive "S:", "\\DBSERVER\USERS"
  end select
next

Merhaba

İlginiz için teşekkür ederim. Deneyip bilgi döneceğim.