'Her defineres den Organisationsenhed, der skal gennemløbes
'Hos os ligger brugerne i en OU, vi har kaldt "Brugere" som igen ligger i "RP4"
'DC angivelserne angiver vores fully qualified domain name.
'Hvis du er i tvivl om hvad jeres FQDN er, kan du se det i "Network identification" 'på din maskine.
Set oTargetOU = GetObject("
LDAP://OU=Brugere,OU=RP4,dc=int,dc=dragsted,dc=com")
oTargetOU.Filter = Array("user")
'Starter gennemløb af brugerne
For each usr in oTargetOU
'Her sættes den nye værdi
usr.Put "scriptPath" , "login.vbs"
'Her gemmes den nye værdi
usr.SetInfo
'Gå til næste bruger i gruppen
next
/Killer