Customer Login Form

Name

Password


<% option explicit %><% response.buffer = "true" %>
<html><head><title>Customer Login Form</title></head>
<body bgColor = "#FFFF99" text = "#800000">
<h1 align = "center">Customer Login Form</h1>
<% if request.querystring("txtName") <> "Customer" or _
   request.querystring("txtPass") <> "12345" then %>
   <form method="get" name="frmC" action="282ln08getall.asp">
      <input type="text" name="txtName" size="20"> Name<br><br>
      <input type="password" name="txtPass" size="20"> Password<br><br>
      <input type="submit" value="Login" name="btnSubmit">
      <input type="reset" value="Clear" name="btnClear">
   </form>
<% else %>
   <% dim strName, strPass, strForm
   strName = request.querystring("txtName")
   strPass = request.querystring("txtPass")
   strForm = request.querystring %>
   <h3 align="center">Welcome Back <% = strName %> !</h3>
   <br><% = strForm %><br><br>
   <% dim formField
   for each formField in request.querystring
      response.write formField
      response.write " = "
      response.write request.querystring(formField)
      response.write "<br>"
   next %>
<% end if %>
</body></html>