Как узнать и изменить пароль IUSR и IWAM

[UncleFather]

Необходимость узнать или изменить пароль аккаунтов может возникнуть после деинсталляции IIS и его повторной инсталляции.

1. Чтобы узнать пароль аккаунта IUSR:
   
   • открыть DOS окно,
     
   • перейти в нужную нам папку командой

     Код: Выделить всё

     cd C:\Inetpub\AdminScripts

     
     
   • команда

     Код: Выделить всё

     cscript.exe adsutil.vbs get w3svc/anonymoususerpass

     покажет пароль IUSR.
   
   
2. Чтобы узнать пароль аккаунта IWAM:
   
   • открыть DOS окно,
     
   • перейти в нужную нам папку командой

     Код: Выделить всё

     cd C:\Inetpub\AdminScripts

     
     
   • команда

     Код: Выделить всё

     cscript.exe adsutil.vbs get w3svc/wamuserpass

     покажет пароль IWAM.
3. Чтобы изменить пароль аккаунта IUSR:
   
   • открыть DOS окно,
     
   • перейти в нужную нам папку командой

     Код: Выделить всё

     cd C:\Inetpub\AdminScripts

     
     
   • команда

     Код: Выделить всё

     cscript.exe adsutil.vbs set w3svc/anonymoususerpass <новый пароль>

     изменит пароль IUSR.
   
   
4. Чтобы изменить пароль аккаунта IWAM:
   
   • открыть DOS окно,
     
   • перейти в нужную нам папку командой cd

     Код: Выделить всё

     C:\Inetpub\AdminScripts

     
     
   • команда

     Код: Выделить всё

     cscript.exe adsutil.vbs set w3svc/wamuserpass <новый пароль>

     изменит пароль IWAM.

При исполнении команды Вы увидите на экране вместо пароля звёдочки. Чтобы получить пароль в открытом виде можно временно изменить исходный текст adsutil.vbs. Для нас имеет интерес только фунция IsSecureProperty оригинальный текст которой приведён ниже:

Код: Выделить всё

' ORIGINAL Code adsutil.vbs!!!
' IsSecureProperty
'
' Checks to see if the property
' requires special processing in
' order to display its contents.


Function IsSecureProperty(ObjectParameter,MachineName)
  On Error Resume Next
  Dim PropObj,Attribute
  Set PropObj = GetObject("IIS://" & MachineName & "/schema/" & ObjectParameter)

  If (Err.Number <> 0) Then
     ReportError ()
     WScript.Echo "Error trying to get the property: " & err.number
     WScript.Quit (Err.Number)
  End If

  Attribute = PropObj.Secure

  If (Attribute = True) Then
     IsSecureProperty = True
  Else
     IsSecureProperty = False
  End If
End Function

Вы можете просто заменить строку

Код: Выделить всё

Attribute = PropObj.Secure

на

Код: Выделить всё

Attribute = False

, или же можете сами что-нибудь придумать. Главное не забудьте после изменения пароля привести скрипт в оригинальное состояние.

Дополнительную информацию можно получить здесь