This is NOT the best way to secure a page
but it does work well for minimal security needs.
To test this scripting idea just cut and paste the following code and save it as a file named "AdminSite.asp".
Its a good example of a weak security ASP script and is very easy to hack.
<% @language=vbscript %> <%
If Request.Form("login") = "MyLogin" AND Request.Form("password") = "MyPassword" Then
response.write"<html>"&VBCrLF
response.write"<head>"&VBCrLF
response.write"<meta http-equiv='Content-Type' content='text/html; charset=windows-1252'>"&VBCrLF
response.write"<title>Admin Page</title>"&VBCrLF
response.write"</head>"&VBCrLF
response.write"<body text='#FF00FF' bgcolor='#000000'>"&VBCrLF
response.write"<div align='center'>"&VBCrLF
response.write" <center>"&VBCrLF
response.write" <table border=0 cellpadding=0 cellspacing=0 style='border-collapse: collapse' bordercolor='#111111' width=480>"&VBCrLF
response.write" <tr>"&VBCrLF
response.write" <td><font size=4 face='Arial'>This is the hidden part</font><hr noshade color='#FF00FF'></td>"&VBCrLF
response.write" </tr>"&VBCrLF
response.write" <tr>"&VBCrLF
response.write" <td><font size=2 face='Verdana'>You can put:</font><ul>"&VBCrLF
response.write" <li><font size=2 face='Verdana'> Links here </font></li>"&VBCrLF
response.write" <li><font face='Verdana' size=2>Secret messages</font></li>"&VBCrLF
response.write" <li><font face='Verdana' size=2>Whatever you like</font></li>"&VBCrLF
response.write" </ul>"&VBCrLF
response.write" <p> </td>"&VBCrLF
response.write" </tr>"&VBCrLF
response.write" <tr>"&VBCrLF
response.write" <td><font size=2 face='Verdana'>Just be aware that if data source errors arise you end up giving access to the part you are trying to protect</font></td>"&VBCrLF
response.write" </tr>"&VBCrLF
response.write" </table>"&VBCrLF
response.write" </center>"&VBCrLF
response.write"</div>"&VBCrLF
response.write"</body>"&VBCrLF
response.write"</html>"&VBCrLF
Else
response.write"<html>"&VBCrLF
response.write"<head>"&VBCrLF
response.write"<meta http-equiv='Content-Type' content='text/html; charset=windows-1252'>"&VBCrLF
response.write"<title>Site Admin - Login</title>"&VBCrLF
response.write"</head>"&VBCrLF
response.write"<body text='#FF0000' bgcolor='#FFFF00'>"&VBCrLF
response.write"<div align='center'>"&VBCrLF
response.write" <center>"&VBCrLF
response.write" <table border='0' cellpadding='0' cellspacing='0' style='border-collapse: collapse' bordercolor='#111111' width='480'>"&VBCrLF
response.write" <tr>"&VBCrLF
response.write" <td><font face='Arial' size='4'>To see the secret stuff please log in below</font><hr noshade color='#FF0000'>"&VBCrLF
response.write" </td>"&VBCrLF
response.write" </tr>"&VBCrLF
response.write" <tr>"&VBCrLF
response.write" <td>"&VBCrLF
response.write" <p align='center'><font face='Verdana' size='2'>This is the Not Secret login page<br>"&VBCrLF
response.write" </font></td>"&VBCrLF
response.write" </tr>"&VBCrLF
response.write" <tr>"&VBCrLF
response.write" <td><font face='Verdana' size='2'>Login: = <b>MyLogin</b><br>"&VBCrLF
response.write" Password: = <b>MyPassword</b></font></td>"&VBCrLF
response.write" </tr>"&VBCrLF
response.write" </table>"&VBCrLF
response.write" </center>"&VBCrLF
response.write"</div>"&VBCrLF
%>
<form ACTION="AdminSite.asp" METHOD="post">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="540" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td ALIGN="right"><font face="Verdana" size="2">Login:</font></td>
<td><input TYPE="text" NAME="login" size="20"></input></td>
</tr>
<tr>
<td ALIGN="right"><font face="Verdana" size="2">Password:</font></td>
<td><input TYPE="password" NAME="password" size="20"></input></td>
</tr>
<tr>
<td ALIGN="right"></td>
<td><input TYPE="submit" VALUE="Login"></input>
<input TYPE="reset" VALUE="Reset"></input> </td>
</tr>
</table>
</center>
</div>
</form>
</body>
</html>
<%
End If
%>
