home *** CD-ROM | disk | FTP | other *** search
/ ftp.americansys.com / 2014.06.ftp.americansys.com.tar / ftp.americansys.com / spamcrusherenterprise.exe / web / runliveupdate.asp < prev    next >
Text File  |  2004-04-12  |  865b  |  33 lines
  1. <html>
  2.     <head>
  3.         <title>Spam Crusher Login</title>
  4.         <meta http-equiv="Content-Language" content="en-us">
  5.         <meta name="GENERATOR" content="Microsoft FrontPage 5.0">
  6.         <meta name="ProgId" content="FrontPage.Editor.Document">
  7.         <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
  8.     </head>
  9.     <body>
  10.     <script LANGUAGE="VBScript" RUNAT="Server">
  11.     </script>
  12.  
  13. <%
  14.  
  15.     ErrorMsg = ""    
  16.     Set SpamCrusher = Server.CreateObject("SpamCrusherEnterprise.SpamCrusherEnte.1")
  17.     SpamCrusher.SetCurrentUser(Session("UserId"))
  18.  
  19.     ErrorMsg = SpamCrusher.SilentLiveUpdate()
  20.     
  21.     SpamCrusher.Logoff()
  22.     
  23.     if (ErrorMsg="") then
  24.         Response.Redirect("myprofile.asp?ErrMsg=Live Update complete")
  25.     else
  26.         Response.Redirect("liveupdate.asp?ErrMsg="+ErrorMsg)
  27.     End If
  28.     
  29.     'Response.Redirect("viewspam.asp?RangeLo=1&RangeHi=100")
  30.     
  31. %>
  32.     </body>
  33. </html>