Enable anonymous-only access in IIS (VBScript)

This code can be found in Chapter 15 of Windows Server 2003 Security Cookbook

Purchase XP Cookbook or Networking Recipes for only $25 plus shipping! While supplies last.

Find out how to download all of the VBScript code from this site.

' This enables anonymous-only access to a web site
' and configures the default user account and password.
' ------ SCRIPT CONFIGURATION ------
strComputer = "<ServerName>"
strSiteID = "<SiteID>"
' ------ END CONFIGURATION ---------
set objWebSite = GetObject("IIS://" & strComputer & "/W3SVC/" & strSiteID)

objWebSite.AllowAnonymous    = True
objWebSite.AnonymousOnly     = True
objWebSite.AnonymousUserName = "DOMAIN\iisuser"
objWebSite.AnonymousUserPass = "!!sUser"
objWebSite.SetInfo

WScript.Echo "Successfully modified Anonymous settings for: " & _
             objWebSite.ServerComment

This code has been viewed 1535 times.

New from the creators of TechTasks.com: StatSheet.com