Como obter a senha de IUSR_*
Enquanto eu tentava diagnosticar um bug de autorização no
SharePoint, eu acabei modificando a conta usada pelo IIS para
representar o usuário anônimo.
Quando eu fui tentar colocar a conta de volta, eu descobri que eu não tinha a senha.
Por sorte, a senha fica armazenada no metabase do IIS 6.0 e com um script simplezinho é possível obtê-lo:
Salve o scrip a baixo com a extenção .VBS, vai no prompt do DOS e execute.
Dim IIsObject, SiteObject
Set IIsObject = GetObject ("IIS://localhost/w3svc") Wscript.Echo Get_IUSR_Password(IIsObject)
Wscript.Echo Get_IWAM_Password(IIsObject)
Function Get_IUSR_Password(IIsObject)
on error resume Next
Dim Out
Out = Out & vbCrLf & "
AnonymousUserName = " & IIsObject.Get("AnonymousUserName")
Out = Out & vbCrLf & "
AnonymousUserPass = " & IIsObject.Get("AnonymousUserPass")
If err=0 Then Out = vbCrLf & "
Path:" & IIsObject.AdsPath & Out
Get_IUSR_Password = Out
End Function
Function Get_IWAM_Password(IIsObject)
on error resume Next
Dim Out
Out = Out & vbCrLf & "
WAMUserName = " & IIsObject.Get("WAMUserName")
Out = Out & vbCrLf & "
WAMUserPass = " & IIsObject.Get("WAMUserPass")
If err=0 Then Out = vbCrLf & "
Path:" & IIsObject.AdsPath & Out
Get_IWAM_Password = Out
End Function
Set IIsObject = GetObject ("IIS://localhost/w3svc") Wscript.Echo Get_IUSR_Password(IIsObject)
Wscript.Echo Get_IWAM_Password(IIsObject)
Function Get_IUSR_Password(IIsObject)
on error resume Next
Dim Out
Out = Out & vbCrLf & "
AnonymousUserName = " & IIsObject.Get("AnonymousUserName")
Out = Out & vbCrLf & "
AnonymousUserPass = " & IIsObject.Get("AnonymousUserPass")
If err=0 Then Out = vbCrLf & "
Path:" & IIsObject.AdsPath & Out
Get_IUSR_Password = Out
End Function
Function Get_IWAM_Password(IIsObject)
on error resume Next
Dim Out
Out = Out & vbCrLf & "
WAMUserName = " & IIsObject.Get("WAMUserName")
Out = Out & vbCrLf & "
WAMUserPass = " & IIsObject.Get("WAMUserPass")
If err=0 Then Out = vbCrLf & "
Path:" & IIsObject.AdsPath & Out
Get_IWAM_Password = Out
End Function
Eu soube que tem scripts por aí que setam a bagaça, mas como este aqui resolveu o meu problema, eu nem procurei mais.
Fonte: http://alfredmyersjr.wordpress.com/2008/05/16/como-obter-a-senha-de-iusr_/
Autor: Alfred Myers
Nenhum comentário:
Postar um comentário