NIM Posted August 6, 2006 Share Posted August 6, 2006 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 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.