home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 May / PCWorld_2002-05_cd.bin / Komunik / sambar / sambar51p.exe / docs / samples / mailit.stm < prev    next >
Encoding:
Text File  |  2002-01-13  |  2.2 KB  |  88 lines
  1. <RC$title = MailIt Form>
  2. <RC$navurl = /samples/index.stm>
  3. <RC$navname = Samples>
  4. <RCinclude /header.stm>
  5.  
  6. <SCRIPT language="JavaScript">
  7. <!--
  8. function Form_Validator(theForm)
  9. {
  10.     if (theForm.server.value == "")
  11.     {
  12.         alert("Please enter a value for the \"SMTP Server\" field.");
  13.         theForm.server.focus();
  14.         return (false);
  15.     }
  16.  
  17.     if (theForm.recipient.value == "")
  18.     {
  19.         alert("Please enter a value for the \"Recipient\" field.");
  20.         theForm.recipient.focus();
  21.         return (false);
  22.     }
  23.  
  24.     if (theForm.from.value == "")
  25.     {
  26.         alert("Please enter a value for the \"From\" field.");
  27.         theForm.from.focus();
  28.         return (false);
  29.     }
  30.  
  31.     if (theForm.subject.value == "")
  32.     {
  33.         alert("Please enter a value for the \"Subject\" field.");
  34.         theForm.subject.focus();
  35.         return (false);
  36.     }
  37. }
  38. //-->
  39. </SCRIPT>
  40.  
  41.  
  42. <CENTER>
  43. <FONT SIZE=6 COLOR=#996633><B>MailIt Form</B></FONT><P>
  44. </CENTER>
  45. This form is a sample PERL mail form that uses the "mailit"
  46. tool shipped with the Sambar Server.
  47. <P>
  48. <FORM ACTION="/cgi-bin/mailit.pl" METHOD=POST onsubmit="return Form_Validator(this)">
  49. <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=5 WIDTH=500>
  50. <TR>
  51. <TD ALIGN=right>Server: </TD>
  52. <TD><INPUT TYPE="text" NAME="server" VALUE="smtp.ix.netcom.com" SIZE=40 MAXLENGTH=40></TD>
  53. </TR>
  54. <TR>
  55. <TD ALIGN=right>Recipient: </TD>
  56. <TD><INPUT TYPE="text" NAME="recipient" VALUE="webmaster@nobody.com" SIZE=40 MAXLENGTH=40></TD>
  57. </TR>
  58. <TR>
  59. <TD ALIGN=right>Your Email: </TD>
  60. <TD><INPUT TYPE="text" NAME="from" VALUE="me@here.com" SIZE=40 MAXLENGTH=40></TD>
  61. </TR>
  62. <TR>
  63. <TD ALIGN=right>Subject: </TD>
  64. <TD><INPUT TYPE="text" NAME="subject" VALUE="Sambar Server mailit test." SIZE=40 MAXLENGTH=40></TD>
  65. </TR>
  66. <TR>
  67. <TD ALIGN=right>Form Data1: </TD>
  68. <TD><INPUT TYPE="text" NAME="FDForm Data 1" VALUE="Form data 1 value." SIZE=40 MAXLENGTH=40></TD>
  69. </TR>
  70. <TR>
  71. <TD ALIGN=right>Form Data2: </TD>
  72. <TD><INPUT TYPE="text" NAME="FDForm Data 2" VALUE="Form data 2 value." SIZE=40 MAXLENGTH=40></TD>
  73. </TR>
  74. <TR>
  75. <TD Valign=top ALIGN=right>Message: </TD>
  76. <TD><TEXTAREA NAME="body" ROWS=6 COLS=50>
  77. Mailit test.
  78.  
  79. </TEXTAREA></TD>
  80. </TR>
  81. <TR>
  82. <TD></TD>
  83. <TD><INPUT TYPE=submit VALUE="Submit"></TD>
  84. </TR>
  85. </TABLE>
  86. </FORM>
  87. <RCinclude /footer.stm>
  88.