Codefixer - ASP CDONTS | Send an Email with CDONTS in ASP

Below is a script that will send an email using the NewMail Object provided that the server has the Collaboration Data Objects for Microsoft Windows NT Server (CDONTS) component installed on it.

Check with your webhost if you aren't sure whether CDONTS is installed. The SMTP service should be installed and running with Internet Information Services (IIS).

<%@ language= "VBscript" %>
<% Option Explicit
'declare your variables
Dim NewMail, Body
'create an instance of the NewMail Object
Set NewMail = Server.CreateObject("CDONTS.NewMail")
NewMail.To= "michael@codefixer.com" ' the email address it will be sent to
NewMail.From= "whoever@hotmail.com" ' the email address it was sent from
Body= "Hi there, just testing codefixer's email tutorial out!"
NewMail.Subject = "Hello"
NewMail.Body = Body
NewMail.Bodyformat=0
NewMail.Mailformat=0
NewMail.Send
Set NewMail=Nothing
%>

If you would like to send it as plain text rather than HTML just remove the 2 lines
NewMail.Bodyformat=0
NewMail.Mailformat=0

Important - CDONTS is deprecated on Windows XP, Windows 2003 and only included on Windows 2000 for backward compatability. Learn how to send email with the CDOSYS component.

Just save your file as email.asp and run it on the server and it should work. Have a look at the form to email tutorial which will make a more dynamic page.

Sending Email with CDONTS