Ik heb een klein script gemaakt wat het wachtwoord van een gebruikers verandert in zijn gebruikersnaam:
strUser = InputBox("Enter full name of user")
strOU = "test"
Set objUser = GetObject("LDAP://CN=" & strUser & ",OU=" & strOU & ",DC=incidenten,DC=local")
objUser.SetPassword strUser
MsgBox "Done!"
Dit werkt perfect, echter werkt dit natuurlijk alleen op de server zelf of een pc die in het domein hangt en een gebruiker met de juiste machtigingen is aangemeld.
Nu vraag ik mij af, is er ook een manier om een dergelijk script te laten functioneren op een pc die niet in het domein zit. Dus dat ik van buiten af via de url de server kan benaderen en het wachtwoord van een gebruiker resetten.
strUser = InputBox("Enter full name of user")
strOU = "test"
Set objUser = GetObject("LDAP://CN=" & strUser & ",OU=" & strOU & ",DC=incidenten,DC=local")
objUser.SetPassword strUser
MsgBox "Done!"
Dit werkt perfect, echter werkt dit natuurlijk alleen op de server zelf of een pc die in het domein hangt en een gebruiker met de juiste machtigingen is aangemeld.
Nu vraag ik mij af, is er ook een manier om een dergelijk script te laten functioneren op een pc die niet in het domein zit. Dus dat ik van buiten af via de url de server kan benaderen en het wachtwoord van een gebruiker resetten.