Providing
24 Hour Emergency Medical & Rescue Service!
Staff
<%
Dim strPassword 'Holds password
Dim strUsername 'Holds username
Dim str_forward 'Holds URL to forward to if sucessful
Dim str_forward2 'Holds URL to forward to if unsucesful
Dim str_form_pass 'Holds password entered in form
Dim str_form_user 'Holds username enetered in form
'Change these details here
strUsername = "member"
strPassword = "res29cue"
'This is the page it goes to if password is correct
str_forward = "/secure/index.asp"
'This is the page it goes to if password is incorrect
str_forward2 = "staff.asp"
IF Request.QueryString("step") = "2" THEN
str_form_user = Request.form("username")
str_form_pass = Request.form("password")
IF str_form_pass = strPassword AND str_form_user = strUsername THEN
Response.redirect(str_forward)
ELSE
Response.redirect(str_forward2)
END IF
Else
end if
%>