How to send mail using CDO - SMTP authentication

set objMessage = createobject("cdo.message") 
set objConfig = createobject("cdo.configuration") 
Set Flds = objConfig.Fields 

Flds.Item("") = 2 
Flds.Item("") ="[Mail Server Name]" 

' ' Passing SMTP authentication 
Flds.Item ("") = 1 'basic (clear-text) authentication 
Flds.Item ("") ="[email protected]" 
Flds.Item ("") ="password" 

Set objMessage.Configuration = objConfig 
objMessage.To = "[email protected]" 
objMessage.From = "[email protected]" 
objMessage.Subject = "New Task" 
objMessage.HTMLBody = "This is a test sent from CDO using smtp authentication." 
If you run into problems when using this code, please post in the DiscountASP.NET or Everleap community forum. Technical support is unable to assist with specific coding issues.