Member Avatar for vipinsgangwar

Hi,
Ihave to send an email from my application.
I am using CDONTS to send it.

The code is as follows:

Dim objCDOMail 
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = "abc"
objCDOMail.To = "myemailid@gmail.com"
objCDOMail.Subject = "Enquiry sent from my web site"
objCDOMail.BodyFormat = 0
objCDOMail.MailFormat = 0  
objCDOMail.Body = "<h2>Hello</h2><br><b>This is my e-mail in HTML format</b>"
objCDOMail.Importance = 1
objCDOMail.Send  
Set objCDOMail = Nothing

I am getting no error. But the mail is also not reaching up to the destination.

can any body help me.
thanks in advance

  • 2 Contributors
  • 1 Reply
  • 68 Views
  • 1 Week Discussion Span
  • Latest Post Latest Post by whisper_101
Member Avatar for whisper_101

Hi

Try This:

<% 

Dim MyCDONTSMail

Set MyCDONTSMail = CreateObject("CDONTS.NewMail")
		
MyCDONTSMail.From= "abc"
		
MyCDONTSMail.To= "myemailid@gmail.com"
		
MyCDONTSMail.Subject="Enquiry sent from my web site"
		
MyBody = MyBody ="Hello" 
		
MyCDONTSMail.Body= MyBody
		
MyCDONTSMail.Send

set MyCDONTSMail=nothing

%>
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.