home *** CD-ROM | disk | FTP | other *** search
/ WinFiles.com 1998 June / WF0698_3.ISO / servers-websrv / websuite.exe / VNSCONFG.AP_ / VNSCONFG.AP
Text File  |  1998-04-01  |  7KB  |  166 lines

  1. <[
  2. // Personal Web Server - VNS Configuration Update
  3. // (c) 1997 SmartDesk, Inc., All Rights Reserved
  4.  
  5.     _apGenerate( )
  6.  
  7.     websrvr = 0 + param( 1 )
  8.     sessionId = 0 + param( 2 )
  9.  
  10.     session = new( "session", websrvr, sessionId )
  11.     if ( ! session.secure( "Server.Modify" ) )
  12.         return( 0 )
  13.     end
  14.  
  15.     file = webServerConfigFile( websrvr )
  16.     ini = new( "inifile", file )
  17.     if ( type( ini ) != "O" )
  18.         session.error( "Unable to locate the " + file + "data file.", "FFFFFF", "000000" )
  19.         return( 0 )
  20.     end
  21.  
  22.     if ( session.var( "cmd" ) == "update" )
  23.  
  24.         vnsFlag = 0
  25.         if ( session.var( "IsVNS" ) == "on" )
  26.             vnsFlag |= 1
  27.         end
  28.         if ( session.var( "IsAPHost" ) == "on" )
  29.             vnsFlag |= 2
  30.         end
  31.         if ( session.var( "IsVnsRedirect" ) == "on" )
  32.             vnsFlag |= 4
  33.         end
  34.         ini.SetString( "LocalVNS", "vnsFlag", "" + vnsFlag )
  35.         
  36.         ini.SetString( "Config", "vnsServer", session.var( "vnsServer" ) )
  37.         ini.SetString( "Config", "vnsUserId", session.var( "vnsUserId" ) )
  38.         ini.SetString( "Config", "apHost", session.var( "apHost" ) )
  39.         ini.SetString( "Config", "apUserId", session.var( "apUserId" ) )
  40.         
  41.         ini.SetString( "LocalVNS", "ftpServer", session.var( "ftpServer" ) )
  42.         ini.SetString( "LocalVNS", "ftpUserId", session.var( "ftpUserId" ) )
  43.         ini.SetString( "LocalVNS", "ftpPassword", session.var( "ftpPassword" ) )
  44.         ini.SetString( "LocalVNS", "ftpDirectory", session.var( "ftpDirectory" ) )
  45.         ini.SetString( "LocalVNS", "vnsInFile", session.var( "vnsInFile" ) )
  46.         ini.SetString( "LocalVNS", "vnsOutFile", session.var( "vnsOutFile" ) )
  47.         ini.SetString( "LocalVNS", "vnsTargetFile", session.var( "vnsTargetFile" ) )
  48.     else
  49.         vnsFlag = 0 + ini.GetString( "LocalVNS", "vnsFlag", "" )
  50.     end
  51. ]>
  52. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
  53. <!-- SmartDesk Active Page, www.smartdesk.com -->
  54. <HTML>
  55. <HEAD>
  56. <TITLE>Personal Web Server - VNS Update</TITLE>
  57. </HEAD>
  58. <BODY BGCOLOR="#000000" TEXT="#FFFFFF" LINK="#00FFFF" VLINK="#00FFFF" ALINK="#00FFFF">
  59.  
  60. <TABLE BORDER=0 WIDTH=600>
  61.  <TR>
  62.   <TD VALIGN="top" WIDTH=159>
  63.    <CENTER>
  64.    <FONT COLOR="#FFFF00"><B>VNS Configuration</B></FONT><BR>
  65.    <A HREF="/index.ap"><IMG SRC="/image/ws.jpg" BORDER=0 WIDTH=159 HEIGHT=300></A><BR>
  66.    <FONT COLOR="#FFFFFF" SIZE=1>
  67.    <P><FONT COLOR="#00FFFF">©Copyright 1997</FONT><BR>by SmartDesk, Inc.<BR>All Rights Reserved</P>
  68.    </FONT>
  69.    </CENTER>
  70.   </TD>
  71.   <TD WIDTH=30>
  72.    <FONT SIZE=5 COLOR="#000000">.</FONT>
  73.   </TD>
  74.   <TD WIDTH=410 VALIGN="top">
  75.   
  76.    <p>
  77.    <CENTER>
  78.    <FONT SIZE=2>
  79.    <A HREF="server.ap">Details</A> |
  80.    <A HREF="srvstats.ap">Statistics</A> |
  81.    <A HREF="srvconfg.ap">Configuration</A> |
  82.    <A HREF="loglist.ap">Server Log</A> |
  83.    <A HREF="/index.ap">Home</A>
  84.    </FONT><BR>
  85.    </CENTER>
  86.    </p>
  87.  
  88.    <FORM ACTION="vnsconfg.ap" METHOD="GET">
  89.    
  90.     <INPUT TYPE="hidden" NAME="cmd" VALUE="update">
  91.    
  92.     <p>The Virtual Name Server (VNS) is used to automatically maintain changing IP addresses for users.  Each time a user's personal web server is started or stopped a synchronization message is sent to the VNS.  This lets others on the net find you regardless of where you are or which IP address you are using.</p>
  93.     <p>    <INPUT TYPE="checkbox" NAME="IsVNS" <[ ! ( vnsFlag & 1 ? "CHECKED" : "" ) ]>> Enable Virtual Name Server Updating</p>
  94.  
  95.     <CENTER>
  96.     <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=330>
  97.      <TR><TD WIDTH=130><B>Server Address:</B></TD><TD WIDTH=200><INPUT NAME="vnsServer" TYPE= "text" VALUE="<[ ! ini.GetString( "Config", "vnsServer", "" ) ]>" SIZE=30></TD></TR>
  98.      <TR><TD WIDTH=130><B>VNS User Id:</B></TD><TD WIDTH=200><INPUT NAME="vnsUserId" TYPE= "text" VALUE="<[ ! ini.GetString( "Config", "vnsUserId", "" ) ]>" SIZE=30></TD></TR>
  99.     </TABLE>
  100.     </CENTER>
  101.  
  102.     <p>AP Hosting provides VNS service for those users without access to their own VNS system.  This is usually because they do not have access to a system with a dedicated IP address to run the VNS software.  SmartDesk provides <a href="http://www.smartdesk.com/aphost.html">AP hosting services</a> that enables others to find you regardless of the IP address used.</p>
  103.     <p>    <INPUT TYPE="checkbox" NAME="IsAPHost" <[ ! ( vnsFlag & 2 ? "CHECKED" : "" ) ]>> Enable AP Hosting Updating</p>
  104.  
  105.     <CENTER>
  106.     <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=330>
  107.      <TR><TD WIDTH=130><B>AP Host Address:</B></TD><TD WIDTH=200><INPUT NAME="apHost" TYPE= "text" VALUE="<[ ! ini.GetString( "Config", "apHost", "" ) ]>" SIZE=30></TD></TR>
  108.      <TR><TD WIDTH=130><B>AP Host User Id:</B></TD><TD WIDTH=200><INPUT NAME="apUserId" TYPE= "text" VALUE="<[ ! ini.GetString( "Config", "apUserId", "" ) ]>" SIZE=30></TD></TR>
  109.     </TABLE>
  110.     </CENTER>
  111.  
  112.     <p>VNS Redirection lets you use an existing web site to maintain your current IP contact information.  This allows you to create one web page that automatically contains your access information whenever your desktop is available, and another when you are unavailable. In this way, the web server will automatically FTP the proper page with the updated IP information whenever you log on or off of your server. FTP access to the server is required.</p>
  113.     <p>    <INPUT TYPE="checkbox" NAME="IsVnsRedirect" <[ ! ( vnsFlag & 4 ? "CHECKED" : "" ) ]>> Enable VNS Redirection</p>
  114.  
  115.     <CENTER>
  116.     <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=330>
  117.      <TR><TD WIDTH=130><B>Server Address:</B></TD><TD WIDTH=200><INPUT NAME="ftpServer" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "ftpServer", "" ) ]>" SIZE=30></TD></TR>
  118.      <TR><TD WIDTH=130><B>User Name:</B></TD><TD WIDTH=200><INPUT NAME="ftpUserId" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "ftpUserId", "" ) ]>" SIZE=30></TD></TR>
  119.      <TR><TD WIDTH=130><B>Password:</B></TD><TD WIDTH=200><INPUT NAME="ftpPassword" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "ftpPassword", "" ) ]>" SIZE=30></TD></TR>
  120.      <TR><TD WIDTH=130><B>Directory:</B></TD><TD WIDTH=200><INPUT NAME="ftpDirectory" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "ftpDirectory", "" ) ]>" SIZE=30></TD></TR>
  121.      <TR><TD WIDTH=130><B>IN file:</B></TD><TD WIDTH=200><INPUT NAME="vnsInFile" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "vnsInFile", "" ) ]>" SIZE=30></TD></TR>
  122.      <TR><TD WIDTH=130><B>OUT file:</B></TD><TD WIDTH=200><INPUT NAME="vnsOutFile" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "vnsOutfile", "" ) ]>" SIZE=30></TD></TR>
  123.      <TR><TD WIDTH=130><B>Destination file:</B></TD><TD WIDTH=200><INPUT NAME="vnsTargetFile" TYPE= "text" VALUE="<[ ! ini.GetString( "LocalVNS", "vnsTargetFile", "" ) ]>" SIZE=30></TD></TR>
  124.     </TABLE>
  125.     </CENTER>
  126.  
  127.    <p><hr></p>
  128.     
  129.     <CENTER>
  130.     <p>
  131.     <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=300>
  132.      <TR>
  133.       <TD align=center>
  134.        <INPUT TYPE="Submit" VALUE="Click Here to Save the Changes">
  135.       </TD>
  136.      </TR>
  137.     </TABLE>
  138.     </p>
  139.     </CENTER>
  140.     
  141.    </FORM>
  142.  
  143.    <p><hr></p>
  144.  
  145.    <p>
  146.    <CENTER>
  147.    <FONT SIZE=2>
  148.    <A HREF="server.ap">Details</A> |
  149.    <A HREF="srvstats.ap">Statistics</A> |
  150.    <A HREF="srvconfg.ap">Configuration</A> |
  151.    <A HREF="loglist.ap">Server Log</A> |
  152.    <A HREF="/index.ap">Home</A>
  153.    </FONT><BR>
  154.    </CENTER>
  155.    </p>
  156.  
  157.    <br><br><br>
  158.  
  159.   </TD>
  160.  </TR>
  161. </TABLE>
  162.  
  163. </BODY>
  164. </HTML>
  165.  
  166.