<%
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 = "united"
strPassword = "steel"
'This is the page it goes to if password is correct
str_forward = "employees.htm"
'This is the page it goes to if password is incorrect
str_forward2 = "login.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
%>
United Steel, Inc. - Employee Access - Fabricators and Erectors of Structural Steel and Miscellaneous Metals
