Home » Knowledgebase » Sample Scripts » Send Mail Using CDO for Windows – Script example for CDO

Send Mail Using CDO for Windows – Script example for CDO

Send Mail Using CDO

On Windows server, you can send mail using CDO. CDO allows to send email using SMTP authentication as well as without SMTP authentication.

Here is the sample code to send email using SMTP authentication using CDO:

<%
Set objEmail = CreateObject("CDO.Message")
objEmail.From = "youremail@domain.com"
objEmail.To = "someone@domain.com"
objEmail.Subject = "Test Mail"
objEmail.Textbody = "Test Mail"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "SMTP SERVER NAME"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = "1"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "youremail@domain.com"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "Email_Account_Password"
objEmail.Configuration.Fields.Update
objEmail.Send
If Not err.number=0 Then
    Response.write "ERROR: " & err.Description
    err.Clear
Else
    Response.write "Email sent to " & objEmail.To
end if
%>

You will have to update SMTP server, SMTP username and password in the above sample script.

Leave a Reply

This site uses Akismet to reduce spam. Learn how your comment data is processed.

%d bloggers like this: