for loop on this

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance



How do i change this script to use a loop

On Error Resume Next

Set objUser = GetObject _
("LDAP://localhost:51008/KEY=xxx,key=Services,key=Configuration,key=yyy,key=zzz,CN=aaa,DC=site0000001,DC=domain,DC=com";)
objUser.Put "KeyValueString", "bbb"
objUser.SetInfo

Set objUser = GetObject _
("LDAP://localhost:51008/key=qqq,key=Services,key=Configuration,key=yyy,key=zzz,CN=aaa,DC=site0000001,DC=domain,DC=com";)
objUser.Put "KeyValueString", "bbb"
objUser.SetInfo




.



Relevant Pages

  • Re: Set PasswordLastChanged value
    ... Set objUser = GetObject _ ... For purposes of testing a product, I need these users' passwords to expire more frequently than the Maximum Password Age policy set for the domain. ... The product need to be tested in our live domain as testing in a test domain has been complete. ...
    (microsoft.public.win32.programmer.wmi)
  • Re: How to change user passwords
    ... > Set objUser = GetObject _ ... > objUser.SetPassword "i5A2sjhe" ... I need to asign a password to all users with a simple vbs. ...
    (microsoft.public.windows.server.scripting)
  • Password Last Changed script for all users...
    ... Consider the following script: ... Set objUser = GetObject _ ... dtmValue = objUser.PasswordLastChanged ...
    (microsoft.public.windows.server.scripting)
  • ADSI Scripting Help Set Sequential Users
    ... I can't figure out how to get my script to loop properly. ... Set objUser = GetObject _ ... I need to change some attributes for accounts that are numbered sequentially. ...
    (microsoft.public.windows.server.active_directory)
  • Re: Where are passwords stored in AD?
    ... First - Why not create a trust and use a single user account? ... Set objUser = GetObject _ ... >ADSIEdit but the encrypted password attribute isn't obvious. ...
    (microsoft.public.windows.server.active_directory)