home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / ins.cab / nnser.asp.2 < prev    next >
Text File  |  1997-10-17  |  7KB  |  270 lines
  1. <% Response.Expires = 0 %>
  2.  
  3. <%
  4. REM LOCALIZATION
  5.  
  6. L_PAGETITLE_TEXT = "Microsoft News Server Administration"
  7. L_SVCINSTNCPROPS_TEXT = "NNTP Server Properties for"
  8. L_DESCRIPTION_TEXT = "Description:"
  9. L_PATHHEADERFIELD_TEXT = "Path Header Field:"
  10. L_IPADDRESS_TEXT = "IP Address:"
  11. L_IPPORT_TEXT = "IP port:"
  12. L_SSLPORT_TEXT = "SSL port:"
  13. L_CONNECTIONS_TEXT = "Connections"
  14. L_LIMITEDTO_TEXT = "Limited to:"
  15. L_CONNECTIONTIMEOUT_TEXT = "Connection timeout:"
  16. L_ENABLELOGGING_TEXT        = "Enable Logging"
  17. L_NNTPSITEID_TEXT        = "NNTP Site Identification"
  18. L_ENTERANINT_ERRORMESSAGE = "Please enter an integer between 0 and "
  19. L_ALLUNASSIGNED_TEXT        = "All Unassigned"
  20.  
  21. REM END LOCALIZATION
  22. %>
  23.  
  24. <% REM Service Page %> 
  25.  
  26. <% REM Get variables %>
  27. <% REM svr = Server name %>
  28.  
  29. <% svr = Request("svr") %>
  30.  
  31. <HTML>
  32. <HEAD>
  33.  
  34. <SCRIPT LANGUAGE="javascript">
  35.  
  36. <% REM Create uForm object and methods %>
  37.  
  38.     uForm = new Object();
  39.     uForm.writeForm = writeForm;
  40.     uForm.readCache = readCache; 
  41.  
  42. <% REM Javascript function readCache loads fields from hiddenform in sidebar %>
  43.  
  44.     function readCache() 
  45.     {
  46.         hform = top.menu.document.hiddenform;
  47.         uform = document.userform;
  48.         uform.txtDescription.value = hform.txtDescription.value;
  49.         uform.txtPathHeaderField.value = hform.txtPathHeaderField.value;
  50.         uform.txtIPAddress.value = hform.txtIPAddress.value;
  51.         uform.txtTCPPort.value = hform.txtTCPPort.value;
  52.         uform.txtSSLPort.value = hform.txtSSLPort.value;
  53.         uform.txtMaxConnections.value = hform.txtMaxConnections.value;
  54.         uform.txtConnectionTimeout.value = hform.txtConnectionTimeout.value;
  55.         uform.hdnEnableLogging.value = hform.txtEnableLogging.value;
  56.         uform.chkEnableLogging.checked = txttochk(uform.hdnEnableLogging);
  57.  
  58.         if(uform.txtIPAddress.value == "")
  59.         {
  60.             uform.txtIPAddress.value = "<% = L_ALLUNASSIGNED_TEXT %>";
  61.         }
  62.  
  63.     }
  64.  
  65. <% REM Javascript function writeForm sets values in hiddenform %>
  66.  
  67.     function writeForm() 
  68.     {
  69.         hform = top.menu.document.hiddenform;
  70.         uform = document.userform;
  71.         hform.txtDescription.value= uform.txtDescription.value;
  72.         hform.txtPathHeaderField.value = uform.txtPathHeaderField.value;
  73.         hform.txtTCPPort.value = uform.txtTCPPort.value;
  74.         hform.txtSSLPort.value = uform.txtSSLPort.value;
  75.         hform.txtMaxConnections.value = uform.txtMaxConnections.value;
  76.         hform.txtConnectionTimeout.value = uform.txtConnectionTimeout.value;
  77.         hform.txtEnableLogging.value = uform.hdnEnableLogging.value;
  78.  
  79.         if(uform.txtIPAddress.value == "<% = L_ALLUNASSIGNED_TEXT %>")
  80.         {
  81.             uform.txtIPAddress.value = "";
  82.         }
  83.         hform.txtIPAddress.value                = uform.txtIPAddress.value;
  84.  
  85.     }
  86.  
  87. <% REM Javascript function chkToTxt converts checkbox bools to text value for hiddenform %>
  88. function txttochk(txtControl)
  89. {
  90.     if (txtControl.value != "0")
  91.     {
  92.         return "true";
  93.     }
  94.     else
  95.     {
  96.         return "false";
  97.     }
  98. }
  99.  
  100. function convertchk(txtControl)
  101. {
  102.     txtControl.value = chkToTxt(this);
  103. }
  104.  
  105.         
  106.  
  107. function chkToTxt(chkControl)
  108. {
  109.     if (chkControl.checked)
  110.     {
  111.         return "-1";
  112.     }
  113.     else
  114.     {
  115.         return "0";
  116.     }
  117. }
  118.  
  119. <% REM Javascript function setUpdated sets "updated" flag in hiddenform when a field is changed %>
  120.  
  121.     function setUpdated() 
  122.     {
  123.         top.menu.document.hiddenform.updated.value = "true";    
  124.     }    
  125.  
  126. <% REM Javascript function setTcpUpdated sets "tcpUpdated" flag in hiddenform %>
  127.  
  128.     function setTcpUpdated()
  129.     {
  130.         top.menu.document.hiddenform.tcpUpdated.value = "true";
  131.     }
  132.  
  133. <% REM Javascript function checkRange checks values between 0 and specified range %>
  134.  
  135.     function checkRange(thisControl,range) 
  136.     {
  137.         if (isFull(thisControl.value) && isNum(thisControl.value))
  138.         {
  139.             if (thisControl.value > range) 
  140.             {
  141.                 alert("<% = L_ENTERANINT_ERRORMESSAGE %>" + range + ".");
  142.                 thisControl.focus()
  143.             }
  144.         }
  145.     }
  146. </SCRIPT>
  147. <% REM Generic Javascript functions %>
  148.  
  149.     <!--#include file="nnisnum.htm" -->
  150.     <!--#include file="nnisfull.htm" -->
  151.     
  152.  
  153. <TITLE><% = L_PAGETITLE_TEXT %></TITLE>
  154. </HEAD>
  155.  
  156. <BODY BGCOLOR="#CCCCCC" TEXT="#000000" TOPMARGIN=10">
  157.  
  158. <FORM NAME="userform" onSubmit="return false;">
  159.  
  160. <P><IMG SRC="images/gnicttl.gif" ALIGN="textmiddle" HEIGHT=10 WIDTH=10> <FONT SIZE=2 FACE="Arial"><B><% = L_SVCINSTNCPROPS_TEXT %>  </B></FONT><FONT FACE="Times New Roman" SIZE=3><I><% = svr %></I></FONT>
  161.  
  162. <FONT FACE="Arial" SIZE=2>
  163.  
  164. <P>    
  165. <P>
  166. <B><% = L_NNTPSITEID_TEXT %></B>
  167. <p>
  168. <blockquote>
  169. <TABLE border=0 WIDTH=340>
  170.     <TR>
  171.         <TD WIDTH=140>
  172.             <FONT SIZE=2 FACE="Arial"><% = L_DESCRIPTION_TEXT %></FONT>
  173.         </TD>
  174.         <TD WIDTH=200>
  175.             <INPUT NAME="txtDescription" TYPE="text" VALUE="" onBlur="setUpdated();" onChange="setUpdated();" SIZE=25>
  176.         </TD>
  177.     </TR>
  178.     <TR>
  179.         <TD HEIGHT=4></TD>
  180.     </TR>
  181.     <TR>
  182.         <TD WIDTH=140>
  183.             <FONT SIZE=2 FACE="Arial"><% = L_PATHHEADERFIELD_TEXT %></FONT>
  184.         </TD>
  185.         <TD WIDTH=200>
  186.             <INPUT NAME="txtPathHeaderField" TYPE="text" VALUE="" onBlur="setUpdated();" onChange="setUpdated();" SIZE=25>
  187.         </TD>
  188.     </TR>
  189.     <TR>
  190.         <TD HEIGHT=4></TD>
  191.     </TR>
  192.     <TR>
  193.         <TD WIDTH=140>
  194.             <FONT SIZE=2 FACE="Arial"><% = L_IPADDRESS_TEXT %></FONT>
  195.         </TD>
  196.         <TD WIDTH=200>
  197.             <INPUT NAME="txtIPAddress" TYPE="text" VALUE="" onBlur="setUpdated();" onChange="setUpdated();" SIZE=25>
  198.         </TD>
  199.     </TR>
  200.     <TR>
  201.         <TD HEIGHT=4></TD>
  202.     </TR>
  203.     <TR>
  204.         <TD WIDTH=140>
  205.             <FONT SIZE=2 FACE="Arial"><% = L_IPPORT_TEXT %></FONT>
  206.         </TD>
  207.         <TD WIDTH=200>
  208.             <INPUT NAME="txtTCPPort" TYPE="text" VALUE="" onBlur="checkRange(this,65535);setUpdated();setTcpUpdated();" onChange="setUpdated();setTcpUpdated();" SIZE=5>
  209.         </TD>
  210.     </TR>
  211.     <TR>
  212.         <TD HEIGHT=4></TD>
  213.     </TR>
  214.     <TR>
  215.         <TD WIDTH=140>
  216.             <FONT SIZE=2 FACE="Arial"><% = L_SSLPORT_TEXT %></FONT>
  217.         </TD>
  218.         <TD WIDTH=200>
  219.             <INPUT NAME="txtSSLPort" TYPE="text" VALUE="" onBlur="checkRange(this,65535);setUpdated();setTcpUpdated();" onChange="setUpdated();" SIZE=5>
  220.         </TD>
  221.     </TR>
  222. </TABLE>
  223. </BLOCKQUOTE>
  224. <P>
  225. <B><% = L_CONNECTIONS_TEXT %></B>
  226. <P>
  227. <BLOCKQUOTE>
  228. <TABLE BORDER=0 WIDTH=340>
  229.     <TR>
  230.         <TD ALIGN="left" WIDTH=140>
  231.             <FONT SIZE=2 FACE="Arial">
  232.             <% = L_LIMITEDTO_TEXT %>  
  233.             </FONT>
  234.         </TD>
  235.         <TD WIDTH=200>
  236.             <INPUT NAME="txtMaxConnections" TYPE="text" VALUE="" onBlur="checkRange(this,15000);setUpdated();" onChange="setUpdated();" SIZE=5>
  237.         </TD>
  238.     </TR>
  239.     <TR>
  240.         <TD HEIGHT=4>
  241.         </TD>
  242.     </TR>
  243.     <TR>
  244.         <TD WIDTH=140>
  245.             <FONT SIZE=2 FACE="Arial"><% = L_CONNECTIONTIMEOUT_TEXT %></FONT>
  246.         </TD>
  247.         <TD WIDTH=200>
  248.             <INPUT NAME="txtConnectionTimeout" TYPE="text" VALUE="" onBlur="checkRange(this,2000000000);setUpdated();" onChange="setUpdated();" SIZE=5>
  249.         </TD>
  250.     </TR>
  251.     <tr><td colspan="2"> </td></tr>
  252.     <tr>
  253.         <td colspan="2">
  254.             <FONT SIZE=2 FACE="Arial">
  255.             <INPUT NAME="chkEnableLogging" TYPE="checkbox" VALUE="" checked="false" OnClick="convertchk(hdnEnableLogging);setUpdated();">
  256.             <% = L_ENABLELOGGING_TEXT %>
  257.             <INPUT NAME="hdnEnableLogging" TYPE="hidden" VALUE="">
  258.             </font>
  259.         </td>
  260.     </tr>
  261. </TABLE>
  262. </BLOCKQUOTE>
  263. </FORM> 
  264. <script language="javascript">
  265.     readCache();
  266. </script>
  267. </BODY>
  268. </HTML>
  269.  
  270.