FileWatcher .vbs Script to send email

[DataMystic Support]

Here is a sample vbscript to sent an email - save it as 'send-email.vbs' and set FileWatcher's command field to point to this file.

See also:
http://www.ericphelps.com/scripting/samples/
http://support.microsoft.com/kb/171440

Code: Select all

Option Explicit

dim objArgs 

'Set a reference to the arguments
Set objArgs = Wscript.Arguments

dim objEmail
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "me@mydomain.com"
objEmail.To = "you@yourdomain.com"
objEmail.Subject = "FileWatcher file attached"
objEmail.Textbody = "Please process it ASAP"

for i = 1 to objArgs.count
  objEmail.AddAttachment( objArgs(i) )
next

objEmail.Send

set objEmail = Nothing
Set objArgs = Nothing