home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2004 December / PCpro_2004_12.ISO / files / webserver / tsw / TSW_3.4.0.exe / Apache2 / asp / form.asp < prev    next >
Encoding:
Text File  |  2003-09-03  |  605 b   |  30 lines
  1. #!/usr/bin/perl /usr/bin/asp-perl
  2.  
  3. <!--#include file=header.inc-->
  4.  
  5. <table>
  6. <form method=POST>
  7. <tr>
  8.     <td>Your Name:</td>
  9.     <td><input name=name type=text size=30 
  10.         value="<%=$Request->Form('name')%>" >
  11.     </td>
  12.     <td><input type=submit value="Submit Name"></td>
  13. </tr>
  14. </table>
  15.  
  16. <% if($Request->Form('name')) { %>
  17.     Your name is <tt><%=$Request->Form('name')%></tt>
  18. <% } %>
  19.  
  20. <hr size=1>
  21.  
  22. The following are the contents of the data returned
  23. from doing a binary read of the form data:
  24. <p>
  25. <tt>
  26. <%=$Request->BinaryRead($Request->{TotalBytes})%>
  27. </tt>
  28.  
  29. <!--#include file=footer.inc-->
  30.