Forum
serverda bulunan bir klasörü Paylaşıma açmak istiyorum. yalnız bir kişi yetkili olacak diğerleir sadece okuyabilecek.
bunu en kısa yolsan nasıl yapabilirim? normal paylaşım yolu ile yaptığımda tek tek gidip pc lere klasörün yolunu göstermem gerekir. ancak ben kısa yoldan serverda tek adımda diyelimki 15 kullanıcıya nasıl okuma hakkı verebilirim? bilgisayarlarına login olduklarında otomatik olarak görünsün istiyorum. map sonradan kaybolmasın.
merhabalar
önce bir grup oluşturun. okuyanlar adını verin mesela. daha sonra sadece okuma hakkı vereceğiniz 15 kişiyi o gruba dahil edin ve klasör üzerindeki izinlemelerde o grubu ekleyin ve sadece Read hakkı verin.
yetkili olacak tek kişiyi de manuel ekleyin oraya full control verin.
map işlemini yaparsın ve bu işlemi yaparken de Reconnect at logon işaretlersin olur biter. ha ben böle istemiyorum dersen GPO'dan logon scripti koyarsın map işlemi yapan öle de olur.
kolay gelsin
ben pc leri tek tek gezmek istemiyorum. server da tek işlem ile kullanıcılar login olduklarında pc lerinde H nin görünmesini istiyorum. bunu nasıl yapacağım? script derken nasıl mesela?
map scriptini alırsın. örnek aşağıdaki gibi;
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colShares = objWMIService.ExecQuery _
("Associators of {Win32_Share.Name='Scripts'} Where " _
& "AssocClass=Win32_ShareToDirectory")
For Each objFolder in colShares
Wscript.Echo objFolder.Name
Next
yada aşağıdaki gibi;
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
bu scriptleri kendi yapına uyarlarsın. ardından GPO'ya Logon scripte koyarsın ve kullanıcılara otomatik olarak map leme yapılır.
yukarıdaki scriptleri vbs uzantılı olarak kaydedin önce.
kolay gelsin