%@ Language = "VBScript" %> <% Option Explicit '********************************************************** ' To make this script work you simply need to create a ' table named tblLoginInfo in your database with one ' column named username and another named password. Put ' the values you want for username and password into a ' record in the table. The advantages of this script are ' that it's more secure than if you hard-coded the ' username/password values directly in the script, and ' that you can change the username and password simply by ' changing the values in your login_table. ' ' NOTE: BE SURE TO EITHER MOVE THE INCLUDED SAMPLE ' DATABASE TO A SECURE AREA OUTSIDE THE WEB SITE OR ' USE A DIFFERENT SECURE DATABASE. '********************************************************** Dim cnnLogin Dim rstLogin Dim strUsername, strPassword Dim strSQL %>
|
<%
If Request.Form("action") <> "validate_login" Then
%>
|
|
|