Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

71 lines
2.4 KiB

  1. <%
  2. DIM intprivate
  3. if (request("private") = "-1") then
  4. intprivate = "True"
  5. elseif request("private") = "0" then
  6. intprivate = "False"
  7. else
  8. intprivate = "False"
  9. end if
  10. %>
  11. <HTML>
  12. <HEAD>
  13. <TITLE>View your guest book</TITLE>
  14. <!--#include virtual = "/iissamples/homepage/sub.inc" -->
  15. </HEAD>
  16. <BODY TopMargin=0 Leftmargin="0" BGColor="#FFFFFF">
  17. <FORM name="qbeform" action="admin.asp" method="POST">
  18. <TABLE border=1 width="100%" height="100%" cellspacing=5 cellpadding=5 rules=box>
  19. <TR>
  20. <TD Background="msg.gif" Colspan="5">
  21. <FONT FACE="arial","helvetica" SIZE="-1">
  22. To administer your guest book, enter values for the fields below
  23. and press the <B>'Submit Query'</B> button</FONT></TD></TR>
  24. <TR><TD align="right" valign="top">
  25. <TT><FONT FACE="arial","helvetica" SIZE="-1">MessageDate</font>: </TT>
  26. </TD>
  27. <TD align="left" valign="top">
  28. <SELECT NAME="MessageDateLimit" SIZE="1">
  29. <OPTION value="less than">less than
  30. <OPTION value="equal to">equal to
  31. <OPTION value="greater than">greater than
  32. </SELECT>
  33. </TD>
  34. <TD align="left" valign="top">
  35. <INPUT NAME="MessageDate" SIZE="27" MAXLENGTH="254" VALUE="<% response.write (month( now ) & "/" & day( now ) & "/" & year( now ) & " " & time()) %>"></TD></TR>
  36. <TR><TD align="right" valign="top">
  37. <TT><FONT FACE="arial","helvetica" SIZE="-1">MessageFrom</font>: </TT>
  38. </TD>
  39. <TD align="left" valign="top">
  40. <SELECT NAME="MessageFromLimit" SIZE="1">
  41. <OPTION VALUE="begins with" >begins with
  42. <OPTION VALUE="contains" >contains
  43. <OPTION VALUE="ends with" >ends with
  44. <OPTION VALUE="equal to">equal to
  45. </SELECT></TD>
  46. <TD align="left" valign="top">
  47. <INPUT NAME="MessageFrom" VALUE="" SIZE="27" MAXLENGTH="254" VALUE="">
  48. </TD></TR>
  49. <TR><TD align="right" valign="top">
  50. <TT><FONT FACE="arial","helvetica" SIZE="-1">MessageSubject</font>: </TT>
  51. </TD>
  52. <TD align="left" valign="top">
  53. <SELECT NAME="MessageSubjectLimit" SIZE="1">
  54. <OPTION VALUE="begins with" >begins with
  55. <OPTION VALUE="contains" >contains
  56. <OPTION VALUE="ends with" >ends with
  57. <OPTION VALUE="equal to">equal to
  58. </SELECT></TD>
  59. <TD align="left" valign="top">
  60. <INPUT NAME="MessageSubject" VALUE="" SIZE="27" VALUE=""></B>
  61. </TD></TR>
  62. <TR><TD Colspan="3">
  63. <INPUT TYPE="SUBMIT" VALUE="Submit Query">
  64. <INPUT TYPE="RESET" VALUE="Reset Defaults"></TD></TR>
  65. <TR><TD Colspan="3">
  66. <B><A HREF="default.asp">Web Site</A></B>
  67. </TD></TR>
  68. </TABLE>
  69. <INPUT NAME="private" TYPE="hidden" VALUE="<% response.write intprivate %>">
  70. </FORM>
  71. </BODY>
  72. </HTML>