home *** CD-ROM | disk | FTP | other *** search
/ WinFiles.com 1998 June / WF0698_3.ISO / servers-websrv / websuite.exe / SRVCONF2.AP_ / SRVCONF2.AP
Text File  |  1998-04-01  |  1KB  |  39 lines
  1. <[
  2. // Personal Web Server - Configuration Update 2
  3. // (c) 1997-98 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.     ini.SetString( "Config", "Name", session.var( "NAME" ) )
  22.     ini.SetString( "Config", "Port", session.var( "PORT" ) )
  23.     ini.SetString( "Config", "Queue_size", session.var( "QUEUE_SIZE" ) )
  24.     ini.SetString( "Config", "Read_size", session.var( "READ_SIZE" ) )
  25.     ini.SetString( "Config", "Write_size", session.var( "WRITE_SIZE" ) )
  26.     ini.SetString( "Config", "Options", session.var( "OPTIONS" ) )
  27. //    ini.SetString( "Config", "Home", session.var( "HOME" ) )
  28. //    ini.SetString( "Config", "defFile", session.var( "DEFFILE" ) )
  29.  
  30.     apCache( strempty( session.var( "apcache" ) ) ? 0 : 1 )
  31.  
  32.     webTransServer( session.var( "TransServer" ) == "on" ? 1 : 0 )
  33.     webGlobalMonitor( session.var( "GlobalMonitor" ) == "on" ? 1 : 0 )
  34.  
  35.     session.response( "<H2>Server Configuration Updated!</H2><A HREF=\"srvconfg.htm\">Continue...</A>", "FFFFFF", "000000", "00FFFF" )
  36.  
  37.     return( 1 )
  38. ]>
  39.