home *** CD-ROM | disk | FTP | other *** search
/ Australian Personal Computer 1999 July / APC47-1.ISO / workshop / win95 / pws / iis4_05.cab / script1a.asp < prev    next >
Encoding:
Text File  |  1997-09-29  |  884 b   |  29 lines
  1. <H2>Sample Form</H2>
  2. <br>
  3. Please provide the following information, then click <strong>Submit</strong>:
  4. <FORM METHOD="POST" ACTION="iiatmd1.asp#script1"><br>
  5. First Name: <INPUT NAME="fname" SIZE="48"><br>
  6. Last Name: <INPUT NAME="lname" SIZE="48"><br>
  7. <br>Title: <INPUT NAME="title" TYPE=RADIO VALUE="mr">Mr.
  8.         <INPUT NAME="title" TYPE=RADIO VALUE="ms">Ms.
  9. <br><br><INPUT TYPE=SUBMIT><INPUT TYPE=RESET>
  10. </FORM>
  11. <% If Request.Form("lname")<>"" then %>
  12. <br>
  13. <center>
  14. <table border=2><tr><td>
  15. <H2><CENTER>Thank you</CENTER></H2><P ALIGN=CENTER>
  16. Thank you, 
  17. <%Title = Request.Form("title") 
  18.     LastName = Request.Form("lname") 
  19.     If Title = "mr" Then%> 
  20.         Mr. <%=LastName%>, 
  21.     <%ElseIf Title = "ms" Then%> 
  22.         Ms. <%=LastName%>, 
  23.     <%Else%>
  24.         <%=Request.Form("fname") & " " & LastName %>
  25.     <%End If%>
  26. for your order.<BR>
  27. </td></tr></table></center>
  28. <%End if %>
  29.