<%
ErrorMsg = ""
Set SpamCrusher = Server.CreateObject("SpamCrusherEnterprise.SpamCrusherEnte.1")
SpamCrusher.SetCurrentUser(Session("UserId"))
ErrorMsg = SpamCrusher.SilentLiveUpdate()
SpamCrusher.Logoff()
if (ErrorMsg="") then
Response.Redirect("myprofile.asp?ErrMsg=Live Update complete")
else
Response.Redirect("liveupdate.asp?ErrMsg="+ErrorMsg)
End If
'Response.Redirect("viewspam.asp?RangeLo=1&RangeHi=100")
%>