Hallo,
Bij mijn weten heb je users, steek je die in global groups, global groups in local groups. Dan kan je rechten toekennen aan een local group.
Ik heb hier een domaincontroller en een fileserver.
Op een bepaalde map (share) heb ik rechten toegekend op local group niveau volgens bovenstaande uitleg => werkt perfect.
Probleem zit hem in mijn login script:
set objShell = WScript.CreateObject("WScript.Shell")
set objNetwork = WScript.CreateObject("WScript.Network")
strDomain = objNetwork.UserDomain
strUser = objNetwork.UserName
'Check ICT membership
'if user is member map the M: drive
if IsMember("LS_dir_ict_read") = true then
objNetwork.MapNetworkDrive "W:", "\\SFILEX2\Vanheede\Vanheede Environment Group\ICT"
end if
Function IsMember(sGroup)
dim objAdmins, user
IsMember = False
set objAdmins = GetObject("WinNT://Vanheede/" & sGroup & ",group")
for each user in objAdmins.members
if user.name = strUser then
IsMember = True
end if
next
End Function
De mapping met de W: drive werkt niet. Stop ik een user echter rechtstreeks in LS_dir_ict_read dan lukt het direct. Zit de user in een global en die global in LS_dir_ict_read, dan lukt het niet.
Dit vind ik wel bizar, ligt de fout ergens in mijn login script ?
Iemand die mij hierbij kan helpen?
Alvast bedankt!
Bij mijn weten heb je users, steek je die in global groups, global groups in local groups. Dan kan je rechten toekennen aan een local group.
Ik heb hier een domaincontroller en een fileserver.
Op een bepaalde map (share) heb ik rechten toegekend op local group niveau volgens bovenstaande uitleg => werkt perfect.
Probleem zit hem in mijn login script:
set objShell = WScript.CreateObject("WScript.Shell")
set objNetwork = WScript.CreateObject("WScript.Network")
strDomain = objNetwork.UserDomain
strUser = objNetwork.UserName
'Check ICT membership
'if user is member map the M: drive
if IsMember("LS_dir_ict_read") = true then
objNetwork.MapNetworkDrive "W:", "\\SFILEX2\Vanheede\Vanheede Environment Group\ICT"
end if
Function IsMember(sGroup)
dim objAdmins, user
IsMember = False
set objAdmins = GetObject("WinNT://Vanheede/" & sGroup & ",group")
for each user in objAdmins.members
if user.name = strUser then
IsMember = True
end if
next
End Function
De mapping met de W: drive werkt niet. Stop ik een user echter rechtstreeks in LS_dir_ict_read dan lukt het direct. Zit de user in een global en die global in LS_dir_ict_read, dan lukt het niet.
Dit vind ik wel bizar, ligt de fout ergens in mijn login script ?
Iemand die mij hierbij kan helpen?
Alvast bedankt!