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