<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<%
' Force Authentication if the LOGON_USER Server Variable is blank
' by sending the Response.Status of 401 Access Denied
' Finish the Page by issuing a Response.End so that a user
' cannot Cancel through the dialog Box
If Request.ServerVariables("LOGON_USER") = "" Then
Response.Status = "401 access denied"
Response.End
End If
%>
Login Screens
Login Screens
You logged in as user: <% = Request.ServerVariables("LOGON_USER") %>
You were authenticated using: <% = Request.ServerVariables("AUTH_TYPE") %> authentication