Hallo,
Ik ben bezig om een paar honderd gebruikers accounts in onze active directory gelijk te trekken, ik wil dit het liefste doen d.m.v. een excel bestand of een csv bestand met de te updaten gebruikers erin (user distinguished name) en een stukje vbs script zoals hieronder. Ik heb zelf echter geen idee hoe ik een soort loop kan maken die voor elke gebruiker uit het excel bestand of het csv bestand het script uitvoert. Hopelijk kan iemand mij op weg helpen.
Andrew
Const ADS_PROPERTY_UPDATE = 2
Set objUser = GetObject _
("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com")
objUser.Put "streetAddress", "Building 43" & vbCrLf & "One Microsoft Way"
objUser.Put "l", "Redmond"
objUser.Put "st", "Washington"
objUser.Put "postalCode", "98053"
objUser.Put "c", "US"
objUser.PutEx ADS_PROPERTY_UPDATE, _
"postOfficeBox", Array("2222", "2223", "2224")
objUser.SetInfo
Ik ben bezig om een paar honderd gebruikers accounts in onze active directory gelijk te trekken, ik wil dit het liefste doen d.m.v. een excel bestand of een csv bestand met de te updaten gebruikers erin (user distinguished name) en een stukje vbs script zoals hieronder. Ik heb zelf echter geen idee hoe ik een soort loop kan maken die voor elke gebruiker uit het excel bestand of het csv bestand het script uitvoert. Hopelijk kan iemand mij op weg helpen.
Andrew
Const ADS_PROPERTY_UPDATE = 2
Set objUser = GetObject _
("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com")
objUser.Put "streetAddress", "Building 43" & vbCrLf & "One Microsoft Way"
objUser.Put "l", "Redmond"
objUser.Put "st", "Washington"
objUser.Put "postalCode", "98053"
objUser.Put "c", "US"
objUser.PutEx ADS_PROPERTY_UPDATE, _
"postOfficeBox", Array("2222", "2223", "2224")
objUser.SetInfo