This web page is protected with WebAccess.

User: <% ' This script checks the values of the variables in case they ' aren't defined -- gives reasonable values when allowPublicAccess is TRUE. ' user = Request.ServerVariables( "HTTP_REMOTE_USER" ) where = Request.ServerVariables( "HTTP_REMOTE_REALM" ) If user = "" Then user = "(none)" End If If where = "" Then where = "(nowhere)" End If Response.write( user + "@" + where ) %>