home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / ins.cab / adminres.asp < prev    next >
Text File  |  1997-10-12  |  2KB  |  48 lines
  1. <%
  2.  REM localization
  3.  
  4.  L_PAGETITLE_HTMLTitle            = "News Offline Search Admin"
  5.  L_NEWSOFFLINESEARCH_StaticText    = "News Offline Search Admin updated."
  6.  L_ERRORMESSAGE_StaticText        = ". Please use your browser back button to go back."
  7.  
  8.  rem END LOCALIZATION
  9.  
  10.  %>
  11.  
  12. <!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
  13. <html>
  14. <head>
  15. <meta http-equiv="Content-Type"
  16. content="text/html; charset=iso-8859-1">
  17. <meta name="GENERATOR" content="Microsoft FrontPage 2.0">
  18. <title><%= L_PAGETITLE_HTMLTitle %></title>
  19. </head>
  20.  
  21. <body background="images\gnback.gif" text="white">
  22. <%Set querybase = Server.CreateObject("req.req.1")
  23.   On Error Resume Next
  24.   querybase.property("mail_pickup_dir")=Request.Form("mail_dir")
  25.   querybase.property("edit_url")=Request.Form("edit_url")
  26.   querybase.property("query_server")=Request.Form("query_server")
  27.   querybase.property("message_template_text")=Request.Form("message_template_string")
  28.   querybase.property("message_template_file")=Request.Form("message_template_file")
  29.   querybase.property("url_template_text")=Request.Form("url_template_string")
  30.   querybase.property("url_template_file")=Request.Form("url_template_file")
  31.   querybase.property("last_search")=Request.Form("last_search")
  32.   querybase.property("from_line")=Request.Form("from_line")
  33.   querybase.property("subject_line")=Request.Form("subject_line")
  34.   querybase.property("query_catalog")=Request.Form("query_catalog")
  35.   querybase.property("search_frequency")=Request.Form("search_frequency")
  36.   querybase.property("news_server")=Request.Form("news_server")
  37.   querybase.property("news_pickup_dir")=Request.Form("news_dir")
  38. %>
  39. <% if (Err <> 0 ) then %>    
  40.     <script language="javascript">
  41.         alert("<%=querybase.property("ErrorString")%><% = L_ERRORMESSAGE_StaticText %>")
  42.     </script>    
  43. <%else%>
  44. <p align="center"><font size="4"><strong><% = L_NEWSOFFLINESEARCH_StaticText %></strong></font></p>
  45. <%end if%>
  46. </body>
  47. </html>
  48.