Forum
Merhaba arkadaslar;
domain ortamında ana makinada verdiğim bir paylaşımı , domaindeki pclerin otomatik olarak ağ sürücüsü olarak görmesi için bat file yapmam gerekiyor sanırım bu dosya içeriği nasıl olmalıdır.
ana makina : DC
Paylaşım Adı : DOSYA
Şimdiden teşekkür ederim.
merhabalar
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
yukarıdaki kodu script olarak kaydedin ve sonra GPO'ya logon script olarak ekleyin.
yada o olmazsa aşağıdakini deneyin:
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
script olarak kaydedin ve sonra GPO'ya logon script olarak ekleyin
kolay gelsin
Teşekkürler,
ancak ben tam olarak kavrayamadım, DBSERVER yazan yere kendi server adımı, USERS yazan yere ise paylaşım adınımı yazacağım,
script olarak kaydetmek derken, uzantısı bat mı yoksa vbs mi olacak.
merhabalar
aynen öle olacak... DBServer = senin sunucu ismin, Users= senin paylaşılmış klasörün.
vbs olarak kaydet ve GPO editle. logon script altına bu scripti ekle. gpo yu güncelle daha sonra da clientların logon olmalarını sağla.
kolay gelsin
Teşekkürler,
ancak çalışmadı bir türlü,
bat dosyası ile hallettim bende,
@echo off
net use k: \\server\dosyaadi
Merhaba
geri bildiriminiz için Teşekkür ederiz .