Posted August 6, 200618 yr UserName = InputBox("Enter the user's login name that you want to unlock:")DomainName = InputBox("Enter the domain name in which the user account exists:")Set UserObj = GetObject("WinNT://"& DomainName &"/"& UserName &"")If UserObj.IsAccountLocked = -1 then UserObj.IsAccountLocked = 0UserObj.SetInfoIf err.number = 0 Then Wscript.Echo "The Account Unlock Failed. Check that the account is, in fact, locked-out."Else Wscript.Echo "The Account Unlock was Successful"End if
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.