Forum

Serverda bir klas&#...
 
Bildirimler
Hepsini Temizle

Serverda bir klasörü paylaştırmak.

4 Yazılar
2 Üyeler
0 Reactions
445 Görüntüleme
(@mustafadogan)
Gönderiler: 290
Reputable Member
Konu başlatıcı
 

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.

 
Gönderildi : 07/10/2008 12:49

(@cozumpark)
Gönderiler: 16307
Illustrious Member Yönetici
 

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

 
Gönderildi : 07/10/2008 12:58

(@mustafadogan)
Gönderiler: 290
Reputable Member
Konu başlatıcı
 

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?

 
Gönderildi : 07/10/2008 13:10

(@cozumpark)
Gönderiler: 16307
Illustrious Member Yönetici
 

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

 
Gönderildi : 07/10/2008 13:16

Paylaş: