Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
Combining several scripts
Ok, so I've added a sub function under the Sub DisplayUserAccount(sSamAcctName) function in bslintx's script. Can someone please read it over and let me know if it'll work because I can only test it once due to company security policy. Sub DisableUser On Error Resume Next Const... -
Combining several scripts
Thank you both for your quick responses!! ok, to add the remove user groups function I would add, Sub RemoveGroups On Error Resume Next Const ADS_PROPERTY_DELETE = 4 Set objUser = GetObject(oRs("adspath")) oMemberOf = objUser.GetEx("memberOf") For Each Group in oMemberOf... -
Combining several scripts
Hi everybody, I'm looking for some help on accomplishing the following: using a single InputBox entry to prompt for the user name, to get the distinguished name and groups of the user. Then using that information to disable the account, move it to an OU, modify some attributes and remove all...
