QueueMon is excellent for monitoring and logging these things, and very 
affordable too.  http://www.invariantsystems.com/queuemon/

FYI, it doesn't official support SmarterMail, but it works perfectly fine on my 
SmarterMail servers.

Thanks!
-----
Jay Sudowski // Handy Networks LLC
Director of Technical Operations
Providing Shared, Reseller, Semi Managed and Fully Managed Windows 2003 Hosting 
Solutions
Tel: 877-70 HANDY x882 |  Fax: 888-300-2FAX
www.handynetworks.com
________________________________________
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of John Doyle
Sent: Monday, April 03, 2006 4:51 PM
To: Declude.JunkMail@declude.com
Subject: RE: [Declude.JunkMail] Hijack Notification

I think I understand, I'm not a programmer and it's semi Greek to me.
I like the idea of getting notified if the spool file begins to fill up, I 
check it now and then and if would be nice
To simply be notified if it begins to back up for whatever reason.

John
.



________________________________________
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Nick Hayer
Sent: Monday, April 03, 2006 11:03 AM
To: Declude.JunkMail@declude.com
Subject: Re: [Declude.JunkMail] Hijack Notification

Hi John,

>John Doyle wrote: 
>this guy suggested this.
>I'm not sure exactly how. looks like if a count is > some value send the
>mail.

I was just suggesting that the number of files in the spool dir exceed some 
number [100?]  then send an email.  I got the idea from the hijack vbs code 
[Thanks!] on the declude website which I kludged to work to notify for the 
spool overflows.. 

-Nick

# spool_mon.vbs
fSpool = "e:\imaillogs\spool"
aMail = "e:\imail\imail1.exe "
mFrom = "-u '[EMAIL PROTECTED]' "
mTo1 = "-t '[EMAIL PROTECTED],[EMAIL PROTECTED]' "

if GetFileCount(fSpool) > 100 then
    MailNotice "Spool", GetFileCount(fSpool), mTo1
end if

Function GetFileCount(folderspec)
    Dim fso, f, f1, fc
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set f = fso.GetFolder(folderspec)
    Set fc = f.Files
    GetFileCount = fc.count
End Function

Function MailNotice(fname, fcount, mTo)
    Dim mCmd, mSubj, WshShell
    set WshShell = WScript.CreateObject("WScript.Shell")
    mSubj = "-s 'Mail held in " & fname & ": " & fcount & "' "
    mCmd = aMail & mFrom & mTo & mSubj & "-f placeholder.txt"
    Return = WshShell.Run(mCmd , 1, TRUE)
End Function

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Nick Hayer
Sent: Sunday, April 02, 2006 7:59 AM
To: Declude.JunkMail@declude.com
Subject: Re: [Declude.JunkMail] Hijack Notification


Hi Craig,

Although you may already do this figured I mention it anyway - this
technique works well to monitor spool traffic eg when a threshold is
reached I get an email -  so for example in your code below IF
FFunc.Count > 100 [altered path for the spool dir] > send me an email...

-Nick

Craig Edmonds wrote:

  
Hi John,

Not sure if this is any help but I found a basic way to handle this as I
    
had
  
problems with clients ringing up saying "I sent out some mails and they
    
have
  
not gone"...etc etc etc, and of course when I check the hold2 directory
there are 500 emails in there.

What I do is have a basic setup that checks for me every 30 minutes if
    
there
  
are some .smd files in the C:\IMAIL\spool\spam\hold2 folder and if it finds
any, it emails me a simple email telling me how many *smd files there are
which then goes to my blackberry letting me know.

I am pretty sure there is an easier way but this is my 10 minute solution
and it works for me.

1) I installed the following object on the mail server
http://www.xs4all.nl/~jarit/asp/filefunc/download.html

2) made a .vbs file called  check4files.vbs and put it in the
C:\IMAIL\spool\spam\hold2 dir.

The code in the .vbs file is like this..

=======================
filepath="C:\IMAIL\spool\spam\hold2\*.smd"
emailfrom="[EMAIL PROTECTED]"
emailto="[EMAIL PROTECTED]"
Set FFunc = CreateObject("FileFunctions.files")
if FFunc.Exists(filepath) then
FFunc.GetFileList(filepath)
  Set objMessage = CreateObject("CDO.Message")
  objMessage.Subject = "(Alert) " & FFunc.Count & " Messages in The Hold
Queue"
  objMessage.From = emailfrom
  objMessage.To = emailto
  strBody = strBody & "There are currently " & FFunc.Count & " files in
    
the
  
Hold Queue" & vbCRLF
  strBody = strBody & "" & vbCRLF
  strBody = strBody & "Date: "  & FormatDateTime(Date, 1) & " - " &
FormatDateTime(Now, 4)
  objMessage.TextBody = strBody
  objMessage.Send
end if
========================

3) Then I set up a scheduled task in the windows schduled tasks to run the
file every 30 minutes.

I hope that helps you.

Kindest Regards
Craig Edmonds
123 Marbella Internet
W: www.123marbella.com
E : [EMAIL PROTECTED]


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


-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of John Doyle
Sent: Wednesday, March 29, 2006 9:25 PM
To: Declude.JunkMail@declude.com
Subject: [Declude.JunkMail] Hijack Notification

Does anyone have a utility to email a notification when hijack holds an ip
address permanently?

Thanks in advance

John
---
This E-mail came from the Declude.JunkMail mailing list.  To unsubscribe,
just send an E-mail to [EMAIL PROTECTED], and type "unsubscribe
Declude.JunkMail".  The archives can be found at
http://www.mail-archive.com.
[ This E-mail has been scanned for Spam and Viruses by Declude ] [ Thank
    
You
  
For Using 123 Marbella Internet ]




[ This E-mail has been scanned for Spam and Viruses by Declude ]
[ Thank You For Using 123 Marbella Internet ]

---
This E-mail came from the Declude.JunkMail mailing list.  To
unsubscribe, just send an E-mail to [EMAIL PROTECTED], and
type "unsubscribe Declude.JunkMail".  The archives can be found
at http://www.mail-archive.com.




    
---
This E-mail came from the Declude.JunkMail mailing list.  To
unsubscribe, just send an E-mail to [EMAIL PROTECTED], and
type "unsubscribe Declude.JunkMail".  The archives can be found
at http://www.mail-archive.com.

---
This E-mail came from the Declude.JunkMail mailing list.  To
unsubscribe, just send an E-mail to [EMAIL PROTECTED], and
type "unsubscribe Declude.JunkMail".  The archives can be found
at http://www.mail-archive.com.


  
---
This E-mail came from the Declude.JunkMail mailing list.  To
unsubscribe, just send an E-mail to [EMAIL PROTECTED], and
type "unsubscribe Declude.JunkMail".  The archives can be found
at http://www.mail-archive.com.

Reply via email to