VBscript - Как изменить настройки анонимной аутентификации для определенного сайта?

Question

Я пишу VBscript, который хотел бы изменить конфигурацию анонимной аутентификации для определенного сайта на моем веб-сервере.Тем не менее, я не уверен, как это делается на пути фиксации.В настоящее время я могу изменить настройки в глобальном масштабе, но я хочу настроить таргетинг только на одну конкретную папку сайта.Моим лучшим предположением было просто указать путь к сайту в конце MACHINE / WEBROOT / APPHOST.

'CHANGE ANONYMOUS AUTHENTICATION GLOBALLY (working code):

Set adminManager = CreateObject("Microsoft.ApplicationHost.WritableAdminManager")

Set anonymousAuthenticationSection = adminManager.GetAdminSection("system.webServer/security/authentication/anonymousAuthentication", "MACHINE/WEBROOT/APPHOST")

anonymousAuthenticationSection.Properties.Item("enabled").Value = True
anonymousAuthenticationSection.Properties.Item("userName").Value = "myUser"
anonymousAuthenticationSection.Properties.Item("password").Value = "myPass"

adminManager.CommitChanges()



'MY BEST GUESS AT TARGETING A SPECIFIC SITE (returns error 80070005):

Set anonymousAuthenticationSection = adminManager.GetAdminSection("system.webServer/security/authentication/anonymousAuthentication", "MACHINE/WEBROOT/APPHOST/Sites/InsideFTL/Corp/redirects/netXposure")

Answer 1

Код, который у вас есть выше, должен работать, вы запускаете его из командной строки с повышенными правами? Вы также можете попытаться убедиться, что он фиксирует файл ApplicationHost.config, чтобы убедиться, что это не проблема блокировки, установив CommitPath, и убедитесь, что удостоверение, под которым вы запускаете скрипт, имеет к нему доступ на запись.

'CHANGE ANONYMOUS AUTHENTICATION For Default Web Site:
Set adminManager = CreateObject("Microsoft.ApplicationHost.WritableAdminManager")
adminManager.CommitPath = "MACHINE/WEBROOT/APPHOST"
Set anonymousAuthenticationSection = adminManager.GetAdminSection("system.webServer/security/authentication/anonymousAuthentication", "MACHINE/WEBROOT/APPHOST/Default Web Site")
anonymousAuthenticationSection.Properties.Item("enabled").Value = True
anonymousAuthenticationSection.Properties.Item("userName").Value = "myUser"
anonymousAuthenticationSection.Properties.Item("password").Value = "myPass"
adminManager.CommitChanges()