- Чтобы узнать пароль аккаунта IUSR:
- открыть DOS окно,
- перейти в нужную нам папку командой
- Код: Выделить всё
cd C:\Inetpub\AdminScripts
- команда
- Код: Выделить всё
cscript.exe adsutil.vbs get w3svc/anonymoususerpass
- открыть DOS окно,
- Чтобы узнать пароль аккаунта IWAM:
- открыть DOS окно,
- перейти в нужную нам папку командой
- Код: Выделить всё
cd C:\Inetpub\AdminScripts
- команда
- Код: Выделить всё
cscript.exe adsutil.vbs get w3svc/wamuserpass
- открыть DOS окно,
- Чтобы изменить пароль аккаунта IUSR:
- открыть DOS окно,
- перейти в нужную нам папку командой
- Код: Выделить всё
cd C:\Inetpub\AdminScripts
- команда
- Код: Выделить всё
cscript.exe adsutil.vbs set w3svc/anonymoususerpass <новый пароль>
- открыть DOS окно,
- Чтобы изменить пароль аккаунта IWAM:
- открыть DOS окно,
- перейти в нужную нам папку командой cd
- Код: Выделить всё
C:\Inetpub\AdminScripts
- команда
- Код: Выделить всё
cscript.exe adsutil.vbs set w3svc/wamuserpass <новый пароль>
- открыть DOS окно,
При исполнении команды Вы увидите на экране вместо пароля звёдочки. Чтобы получить пароль в открытом виде можно временно изменить исходный текст 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
Дополнительную информацию можно получить здесь