home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2002 March / PCWMAR02.iso / software / windowsxp / ftgateoffice / ftgateoffice.exe / Main / addentry.fts < prev    next >
Encoding:
Text File  |  2001-11-29  |  8.4 KB  |  295 lines
  1. <% 
  2. #include </utility/security.fts>
  3. #include </utility/global.fts>
  4. #include </utility/theme.fts>
  5. #include </utility/ftgate.fts>
  6. #include </utility/asperrors.fts>
  7.  
  8. var ldapdata = new server.ldapdata
  9.  
  10. session.system.error=0
  11.  
  12. var qMail=""
  13. var qCn=""
  14. var qGn=""
  15. var qSn=""
  16. var qTitle=""
  17. var qOu=""
  18. var qO=""
  19. var qFn=""
  20. var qPn=""
  21. var qImport=0
  22. var id=0
  23.  
  24. if (form.config=="1")
  25. {
  26.     if (form.id)
  27.     {
  28.         ldapdata.entry.selectid(form.id)
  29.         ldapdata.entry.update("mail", form.mail)
  30.         ldapdata.entry.update("cn", form.cn)
  31.     }
  32.     else
  33.             ldapdata.entry.new(form.cn, form.mail)
  34.  
  35.     ldapdata.entry.update("givenname", form.gn)
  36.     ldapdata.entry.update("cn", form.cn)
  37.     ldapdata.entry.update("sn", form.sn)
  38.     ldapdata.entry.update("title", form.title)
  39.     ldapdata.entry.update("ou", form.ou)
  40.     ldapdata.entry.update("o", form.o)
  41.     ldapdata.entry.update("facsimiletelephonenumber", form.fn)
  42.     ldapdata.entry.update("telephonenumber", form.pn)
  43.  
  44.     output.redirect("lookup.fts")
  45. }
  46. else
  47. {
  48.     if (request.mail)
  49.     {
  50.         var sql = "mail LIKE '"+request.mail+"'"
  51.  
  52.         if (request.cn!="")
  53.             sql = sql +" AND cn LIKE '"+request.cn+"'"
  54.  
  55.         if (request.gn!="")
  56.             sql = sql +" AND givenname LIKE '"+request.gn+"'"
  57.  
  58.         if (request.sn!="")
  59.             sql = sql +" AND sn LIKE '"+request.sn+"'"
  60.  
  61.         if (request.o!="")
  62.             sql = sql +" AND o LIKE '"+request.o+"'"
  63.  
  64.         if (ldapdata.entry.select(sql))
  65.         {
  66.             var ok2 = ldapdata.entry.field.first()
  67.             while (ok2)
  68.             {
  69.                 if (ldapdata.entry.field.name=="mail")
  70.                     qMail=ldapdata.entry.field.value
  71.                 else if (ldapdata.entry.field.name=="cn")
  72.                     qCn=ldapdata.entry.field.value
  73.                 else if (ldapdata.entry.field.name=="givenname")
  74.                     qGn=ldapdata.entry.field.value
  75.                 else if (ldapdata.entry.field.name=="sn")
  76.                     qSn=ldapdata.entry.field.value
  77.                 else if (ldapdata.entry.field.name=="o")
  78.                     qO=ldapdata.entry.field.value
  79.                 else if (ldapdata.entry.field.name=="title")
  80.                     qTitle=ldapdata.entry.field.value
  81.                 else if (ldapdata.entry.field.name=="ou")
  82.                     qOu=ldapdata.entry.field.value
  83.                 else if (ldapdata.entry.field.name=="facsimiletelephonenumber")
  84.                     qFn=ldapdata.entry.field.value
  85.                 else if (ldapdata.entry.field.name=="telephonenumber")
  86.                     qPn=ldapdata.entry.field.value
  87.                 else if (ldapdata.entry.field.name=="imported")
  88.                     qImport=ldapdata.entry.field.value
  89.  
  90.                 ok2=ldapdata.entry.field.next()
  91.             }
  92.  
  93.             id=ldapdata.entry.id
  94.         }
  95.     }
  96. }
  97. %>
  98. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
  99. <HTML>
  100. <HEAD>
  101. <LINK REL=STYLESHEET HREF="/utility/main<%=nn4%>.css" TYPE="text/css">
  102. <META NAME="GENERATOR" Content="Microsoft Developer Studio">
  103. <META HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-1">
  104. <TITLE>Services -- LDAP Service</TITLE>
  105.  
  106. <SCRIPT LANGUAGE="JavaScript1.2" TYPE="text/javascript">
  107. <!--
  108. var dir="<%=buttons%>";
  109. var pro=<%=build()==FTGATE_PRO%>;
  110.  
  111. if (!document.images) {}
  112. else {
  113.   add0 = new Image();
  114.   add0.src  = dir+"add.gif";
  115.   add1 = new Image();
  116.   add1.src = dir+"addon.gif";
  117.   close0 = new Image();
  118.   close0.src  = dir+"ok.gif";
  119.   close1 = new Image();
  120.   close1.src = dir+"okon.gif";
  121.   cancel0 = new Image();
  122.   cancel0.src  = dir+"cancel.gif";
  123.   cancel1 = new Image();
  124.   cancel1.src = dir+"cancelon.gif";
  125. }
  126.  
  127. function change(Name,Image,No)
  128. {
  129.   if (!document.images) {}
  130.   else document [Name].src = eval(Image + No + ".src");
  131. }
  132.  
  133. <%
  134. if (netscape)
  135. {
  136.     %>
  137.     document.captureEvents(Event.KEYPRESS);
  138.     document.onkeypress = keypress;
  139.  
  140.     function keypress(event)
  141.     {
  142.         if (event.which==13)
  143.         {
  144.             createEntry();
  145.             return false;
  146.         }
  147.  
  148.         return true;
  149.     }
  150.     <%
  151. }
  152. else
  153. {
  154.     %>
  155.     function keypress()
  156.     {
  157.         if (event.keyCode==13)
  158.         {
  159.             event.returnValue=null;
  160.             createEntry();
  161.         }
  162.     }
  163.     <%
  164. }
  165. %>
  166.  
  167. function onLoad()
  168. {
  169.     <%
  170.     if (session.system.error)
  171.     {
  172.         output.writeln("window.alert(aspError("+session.system.error+"));")
  173.     }
  174.     %>
  175.  
  176.     setPage(5, "LDAP Service");
  177.   document.ftgate.cn.focus();
  178. }
  179.  
  180. function createEntry()
  181. {
  182.     if (!isEmail(document.ftgate.mail.value))
  183.     {
  184.         alert("You must provide a valid email address.");
  185.         document.ftgate.mail.focus();
  186.         return;
  187.     }
  188.  
  189.     document.ftgate.submit();
  190. }
  191.  
  192. function onCancel()
  193. {
  194.     if (!checkModified())
  195.         return;
  196.  
  197.     change('cancelA', 'cancel', 0);
  198.     window.location.href = "lookup.fts";
  199. }
  200. //-->
  201. </SCRIPT>
  202. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/cookies.js" TYPE="text/javascript"></SCRIPT>
  203. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/core.js" TYPE="text/javascript"></SCRIPT>
  204. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/asperrors.js" TYPE="text/javascript"></SCRIPT>
  205. </HEAD>
  206.  
  207. <BODY BGCOLOR="white" onLoad="onLoad()" MARGINHEIGHT="0" MARGINWIDTH="0" onkeypress="keypress()">
  208.  
  209. <TABLE BORDER="0" BGCOLOR="<%=border%>" WIDTH="<%=bodywidth%>" HEIGHT="<%=bodyheight%>" CELLPADDING="0" CELLSPACING="0"><TR><TD> </TD><TD VALIGN="TOP">
  210.  
  211. <A HREF="index.fts"><SPAN ID="top">Services</SPAN></A><SPAN ID="top"> /</SPAN>
  212. <SPAN ID="topsel">LDAP Service</SPAN>
  213.  
  214. <FORM NAME="ftgate" METHOD="POST" ACTION="addentry.fts">
  215. <INPUT TYPE="HIDDEN" NAME="config" VALUE="1">
  216. <INPUT TYPE="HIDDEN" NAME="id" VALUE="<%=id%>">
  217.  
  218. <!-- start of the tabs -->
  219. <!-- end of the tabs -->
  220.  
  221. <!-- start of the tab body -->
  222. <TABLE BORDER="0" BGCOLOR="<%=border%>" WIDTH="100%" CELLPADDING="0" CELLSPACING="0"><TR><TD>
  223. <TABLE <%=table%> CELLPADDING="0" CELLSPACING="0">
  224.   <!-- start of block -->
  225.   <TR>
  226.     <TD VALIGN="TOP">
  227.         <!-- sub table goes here -->
  228.         <TABLE BORDER="0" WIDTH="100%">
  229.           <TR>
  230.                 <TD VALIGN="TOP">
  231.                         <TABLE CLASS="box" WIDTH="100%">
  232.                             <TR><TH>LDAP Entry</TH></TR>
  233.                             <TR>
  234.                                 <TD>
  235.                                     <TABLE BORDER="0" WIDTH="100%">
  236.                                         <TR><TD>Common name</TD><TD><INPUT TYPE="TEXT" NAME="cn" VALUE="<%=qCn%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  237.                                         <TR><TD>First name</TD><TD><INPUT TYPE="TEXT" NAME="gn" VALUE="<%=qGn%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  238.                                         <TR><TD>Last name</TD><TD><INPUT TYPE="TEXT" NAME="sn" VALUE="<%=qSn%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  239.                                         <TR><TD>Email address</TD><TD><INPUT TYPE="TEXT" NAME="mail" VALUE="<%=qMail%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  240.                                         <TR><TD>Job title</TD><TD><INPUT TYPE="TEXT" NAME="title" VALUE="<%=qTitle%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  241.                                         <TR><TD>Organization</TD><TD><INPUT TYPE="TEXT" NAME="o" VALUE="<%=qO%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  242.                                         <TR><TD>Department</TD><TD><INPUT TYPE="TEXT" NAME="ou" VALUE="<%=qOu%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  243.                                         <TR><TD>Phone number</TD><TD><INPUT TYPE="TEXT" NAME="pn" VALUE="<%=qPn%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  244.                                         <TR><TD>Fax number</TD><TD><INPUT TYPE="TEXT" NAME="fn" VALUE="<%=qFn%>" SIZE="<%=size40%>" onChange="setModified(true)"></TD></TR>
  245.                                     </TABLE>
  246.                                 </TD>
  247.                             </TR>
  248.                         </TABLE>
  249.                     </TD>
  250.                 </TR>
  251.               <TR>
  252.                   <TD ALIGN="RIGHT">
  253.                     <%
  254.                         if (request.mail)
  255.                         {
  256.                             %>
  257.                             <A HREF="javascript:createEntry()"
  258.                             onMouseDown="change('closeA', 'close', 1)"
  259.                             onMouseOut="change('closeA', 'close', 0)"><IMG SRC="<%=buttons%>ok.gif" NAME="closeA" BORDER="0" WIDTH="50" HEIGHT="20" ALT="Change LDAP entry"></A>
  260.                             <%
  261.                         }
  262.                         else
  263.                         {
  264.                             %>
  265.                             <A HREF="javascript:createEntry()"
  266.                             onMouseDown="change('addA', 'add', 1)"
  267.                             onMouseOut="change('addA', 'add', 0)"><IMG SRC="<%=buttons%>add.gif" NAME="addA" BORDER="0" WIDTH="50" HEIGHT="20" ALT="Add LDAP entry"></A>
  268.                             <%
  269.                         }
  270.                         %>
  271.                       <A HREF="javascript:onCancel()"
  272.                       onMouseDown="change('cancelA', 'cancel', 1)"
  273.                       onMouseOut="change('cancelA', 'cancel', 0)"><IMG SRC="<%=buttons%>cancel.gif" NAME="cancelA" BORDER="0" WIDTH="50" HEIGHT="20" ALT="Cancel" HSPACE="5"></A>
  274.                   </TD>
  275.               </TR>
  276.         </TABLE>
  277.         <!-- sub table ends here -->
  278.     </TD>
  279.   </TR>
  280.   <!-- end of block -->
  281. </TABLE>
  282. <!-- end of the tab body -->
  283. </TD></TR></TABLE>
  284.  
  285. <SCRIPT LANGUAGE="JavaScript1.2" TYPE="text/javascript">
  286. <!--
  287.     var href="/services/addentry.fts";
  288.     var bodywidth=<%=bodywidth%>;
  289. //-->
  290. </SCRIPT>
  291. <SCRIPT LANGUAGE="JavaScript1.2" SRC="/utility/footer.js" TYPE="text/javascript"></SCRIPT>
  292. </FORM>
  293. </TD><TD WIDTH="10"> </TD></TR></TABLE>
  294. </BODY>
  295. </HTML>