CDONTS.NewMail ???

[pilg]

Hi,

I've just came across a wierd problem with one of my ASP pages, everything was working fine up untill 2 weeks ago. I don't know what has changed.

I have job logging system where jobs are tracked and updates made to requests. Whenever an update is made an email is sent to the customer and the engineer. The system has been in place for arouund a year now with no problems upto now.

It has decided just to stop sending updates. I recieve the following error:

Microsoft VBScript runtime (0x800A01AD)
ActiveX component can't create object: 'CDONTS.NewMail'
/specs/IssueChange.asp, line 571

I qoute I have not changed anything, The SMTP server is still working correctly.

The lines in question in my code are:

Set newMsg = CreateObject("CDONTS.NewMail") - Fails here???
newMsg.BodyFormat=0
newMsg.MailFormat=0
newMsg.From=Dlookup("settings","notify_change_from","settings_id=1")
newMsg.To=Dlookup("users","email","user_id=" & orig_submitted)
newMsg.Subject = mailSubject
newMsg.Body =mailBody
newMsg.Send
set newMsg=Nothing

I cannot think of anything else to check? does the code look OK? how could I test things? any advice would be appreciated.

Thanks in advance,

Regards,

Pilg.

 

[vbkris]

what is ur OS? only certain system has the CDONTS package installed...

Known is handfull, Unknown is worldfull

 

[Tarwn]

Is it possible someone reconfigured the SMTP server, add rules to the firewall, etc?

I have run into problems in the past where people hae added rules to Email Servers that wouldn't allow me to connect anymore. Or added rules to Firewalls to block mail going through from specific addresses (or block it if it isn't from a specific internal mail server).

_{01000111 01101111 01110100 00100000 01000011 01101111 01100110 01100110 01100101 01100101 00111111}
Help, the rampaging, spear-waving, rabid network gnomes are after me!

 

[pilg]

Cheers guys I have managed to solve the problem. Someone had played with the SMTP server.

Thanks again.