I find some emails cannot be viewed in the quarantine.   Using the GUI the message does not open and using the web interface we get:

Microsoft VBScript runtime error '800a000d'
Type mismatch: 'HTMLEncode'
?

Any idea why this is?  Reason being we seem to be getting a lot of spam that appear to originate from the same spammer and want to be able to better filter them.

On another note, I tried referencing the spam directly in the database, but couldn't seem to locate the message body text.  What table/field is the message body located?

Ah, thanks.  That explains why I cannot find the message body.  But that just leaves why the null in the database? 

Could it be that these are bounces as result of spoofed spam to another domain and they are coming back here in a large batch like this?

Ric,

I've answered the original question in the following way:

==================================================

Alan,

The NULL messages Ric refers to are most likely caused by antivirus software on the software deleting the temp email files that SpamFilter spools to the hard disk. We actually designed SpamFilter to spool messages to disk briefly to give antiviruses a chance to clean/delete infected files. If that occurs SpamFilter detects the missing files, will "understand" what happened and will continue to operate normally, storing a NULL in the database instead of the email content.

The bug is actually with the ASP pages not being able to handle the NULL. Please let us know if you need ASP code to work around that.

Roberto F.
LogSat Software

Here's something I run periodically... it simply looks for tblquarantine records that have msg records with NULL values then sets them to expire, it then displays the number of quar records marked to be deleted.

it's probably not the best solution, but it does the job:

-Ric

<%
  SQL = "select tblquarantine.* from tblquarantine left outer join tblmsgs on tblquarantine.msgid=tblmsgs.msgid where tblmsgs.msgid is NULL and deliver = 0 and expire = 0"

  Set rs = con.Execute(SQL)

  If rs.EOF Then
   Response.Write "<h2>No 'unlinked' messages in database!</h2>"
  Else
   rs.movefirst
   Do Until rs.eof
    SQL = "UPDATE tblQuarantine "
       SQL = SQL & "SET Expire = 1 "
    SQL = SQL & "WHERE QuarID = " & rs("QuarID")
    X = X + 1
    con.Execute SQL
    response.write "Purging Entry for QuarID: " & rs("QuarID") & "<BR>"
    rs.MoveNext
   Loop
   Set rs = Nothing
  End If
%>
Purge Complete.<BR>
<B><%=X%></B> Entries deleted.<BR><BR>

Alan,

In the ResolveSpam.asp page, simply change the following line:

<%=Server.HTMLEncode(rs("Msg"))%>

to:

<%if rs("Msg") <> NULL then Response.Write Server.HTMLEncode(rs("Msg"))%>