home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2002 March / PCWMAR02.iso / software / windowsxp / ftgateoffice / ftgateoffice.exe / Main / join.fts < prev    next >
Encoding:
Text File  |  2001-11-29  |  4.1 KB  |  186 lines
  1. <%
  2. #include </utility/security.fts>
  3. #include </utility/global.fts>
  4. #include </utility/theme.fts>
  5. #include </utility/ftgate.fts>
  6.  
  7. var d = new server.domain
  8. var m
  9.  
  10. var domain
  11. var name
  12.  
  13. session.system.error=0
  14.  
  15. if ((form.command==1)||(form.command==3))
  16. {
  17.     domain = form.domain
  18.     name = form.name
  19.  
  20.     d.domainname = form.domain
  21.     m = new d.mailbox
  22.     m.name=name
  23.  
  24.     m.jointitle = form.jointitle
  25.     m.jointext = form.jointext
  26.  
  27.     if (form.command==3)
  28.         output.redirect("done.fts")
  29.     else
  30.         output.redirect("leave.fts?domain="+domain+"&name="+name)
  31. }
  32. else if (form.command=="2")
  33. {
  34.     output.redirect("controls.fts?domain="+form.domain+"&name="+form.name)
  35. }
  36. else
  37. {
  38.     domain = request.domain
  39.     name = request.name
  40.  
  41.     d.domainname = request.domain
  42.     m = new d.mailbox
  43.     m.name=name
  44. }
  45. %>
  46. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
  47. <HTML>
  48. <HEAD>
  49. <LINK REL=STYLESHEET HREF="/utility/main<%=nn4%>.css" TYPE="text/css">
  50. <META NAME="GENERATOR" Content="Microsoft Developer Studio">
  51. <META HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-1">
  52. <TITLE>Mailbox Wizard</TITLE>
  53. <SCRIPT LANGUAGE="JavaScript1.2" TYPE="text/javascript">
  54. <!--
  55. var dir="<%=buttons%>";
  56.  
  57. <%
  58. if (netscape)
  59. {
  60.   %>
  61.   var enter=false;
  62.   document.captureEvents(Event.KEYPRESS|Event.FOCUS);
  63.   document.onkeypress = keypress;
  64.   document.onfocus = focus;
  65.  
  66.   function focus(event)
  67.   {
  68.     if (event.target==document.ftgate.jointext)
  69.     {
  70.       enter=true;
  71.     }
  72.     else
  73.       enter=false;
  74.   }
  75.  
  76.   function keypress(event)
  77.   {
  78.     if (enter)
  79.       return true;
  80.  
  81.     if (event.which==13)
  82.     {
  83.       onApply();
  84.       return false;
  85.     }
  86.  
  87.     return true;
  88.   }
  89.   <%
  90. }
  91. else
  92. {
  93.   %>
  94.   function keypress()
  95.   {
  96.     if (document.activeElement==document.ftgate.jointext)
  97.       return;
  98.  
  99.     if (event.keyCode==13)
  100.     {
  101.       event.returnValue=null;
  102.       onApply();
  103.     }
  104.   }
  105.   <%
  106. }
  107. %>
  108.  
  109. function isOK(form)
  110. {
  111.     return true;
  112. }
  113.  
  114. function onLoad()
  115. {
  116.     <%
  117.     if (session.system.error)
  118.     {
  119.         output.writeln("alert(aspError("+session.system.error+"));")
  120.     }
  121.     %>
  122.   document.ftgate.jointitle.focus();
  123. }
  124. //-->
  125. </SCRIPT>
  126. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/cookies.js" TYPE="text/javascript"></SCRIPT>
  127. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/core.js" TYPE="text/javascript"></SCRIPT>
  128. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/wizard.js" TYPE="text/javascript"></SCRIPT>
  129. </HEAD>
  130.  
  131. <%
  132. var pagetitle="Join Message"
  133. #include <header.fts>
  134. %>
  135.  
  136. <!-- start of the tabs -->
  137. <FORM NAME="ftgate" METHOD="POST" onSubmit="return isOK(this)" ACTION="join.fts">
  138. <INPUT TYPE="HIDDEN" NAME="command" VALUE="1">
  139. <INPUT TYPE="HIDDEN" NAME="domain" VALUE="<%=domain%>">
  140. <INPUT TYPE="HIDDEN" NAME="name" VALUE="<%=name%>">
  141.  
  142. <!-- start of the tab body -->
  143. <TABLE BORDER="0" BGCOLOR="<%=border%>" WIDTH="100%" CELLPADDING="0" CELLSPACING="0"><TR><TD>
  144. <TABLE <%=table%> CELLPADDING="0" CELLSPACING="0">
  145.   <!-- start of block -->
  146.   <TR>
  147.     <TD VALIGN="TOP">
  148.         <!-- sub table goes here -->
  149.         <TABLE BORDER="0" WIDTH="100%">
  150.           <TR>
  151.                 <TD>
  152.                         <TABLE BORDER="0" WIDTH="100%">
  153.                             <TR>
  154.                                 <TH COLSPAN="3">This message will be sent whenever someone joins the list.<P></TH>
  155.                             </TR>
  156.                             <TR>
  157.                                 <TD ROWSPAN="2" VALIGN="TOP">Join message</TD>
  158.                                 <TD>Subject</TD>
  159.                                 <TD><INPUT TYPE="TEXT" NAME="jointitle" VALUE="<%=m.jointitle%>" SIZE="40" onKeyPress="setModified(true)"></TD>
  160.                             </TR>
  161.                             <TR>
  162.                                 <TD VALIGN="TOP">Text</TD>
  163.                                 <TD><TEXTAREA NAME="jointext" ROWS="5" COLS="40" onKeyPress="setModified(true)">
  164. <%=m.jointext%></TEXTAREA></TD>
  165.                             </TR>
  166.                         </TABLE>
  167.           </TD>
  168.             </TR>
  169.                 <%
  170.                 #include <footer.fts>
  171.                 %>
  172.         </TABLE>
  173.         <!-- sub table ends here -->
  174.     </TD>
  175.   </TR>
  176.   <!-- end of block -->
  177. </TABLE>
  178. <!-- end of the tab body -->
  179. </TD></TR></TABLE>
  180. <INPUT TYPE="HIDDEN" NAME="href" VALUE="/mailboxes/wizard/join.fts?domain=<%=domain%>&name=<%=name%>">
  181. </FORM>
  182.  
  183. </TD><TD WIDTH="10"> </TD></TR></TABLE>
  184. </BODY>
  185. </HTML>
  186.