<% @language="vbscript" %> [an error occurred while processing this directive] <% ' Was this page posted to? If UCase(Request.ServerVariables("HTTP_METHOD")) = "POST" Then ' If so, check the username/password that was entered. If ComparePassword(Request("UID"),Request("PWD")) Then ' If comparison was good, store the user name... Session("UID") = Request("UID") ' ...and redirect back to the original page. Response.Redirect Session("REFERRER") End If End If %>

 

Enter User Name and Password
	Please type your user name and password.
	Site	<%=Request.ServerVariables("SERVER_NAME")%>
	User Name
	Password

<% @language="vbscript" %> [an error occurred while processing this directive] <% ' Was this page posted to? If UCase(Request.ServerVariables("HTTP_METHOD")) = "POST" Then ' If so, check the username/password that was entered. If ComparePassword(Request("UID"),Request("PWD")) Then ' If comparison was good, store the user name... Session("UID") = Request("UID") ' ...and redirect back to the original page. Response.Redirect Session("REFERRER") End If End If %>

 

Enter User Name and Password
	Please type your user name and password.
	Site	<%=Request.ServerVariables("SERVER_NAME")%>
	User Name
	Password