trigger an e mail

Hi,

 Following  is the rutine that we are using to send e mails automatically.
At the moment of executing the program with this rutine, it show an error:
"run time error 429, ActiveX component can't create object"


  Dim myMail
  Set myMail = CreateObject("CDONTS.NewMail")
   myMail.From = "joseg@xxxxxxxxxxxxxxxx"
   myMail.To = "alvarezm@xxxxxxxxxxxxxxxx"
   myMail.Subject = "New Orders"
   myMail.Body = "This is to inform you of a new order release"
   ' myMail.AttachFile "d:\sample.txt"
   myMail.Send

   Set myMail = Nothing

At first we thought it was because the DLL (cdonts) was not loaded, but we
added that to
c:\windows\system, but the error continues.

Does anyone have a suggestion?

John Connolly,
Innovatec,
Mexico City


 XSL-List info and archive:  http://www.mulberrytech.com/xsl/xsl-list