Share via


Send Email from a Script using CDO

Here is a code snippet of a script that uses CDO to send email from a computer. 

 Set objEml = CreateObject("CDO.Message")
 objEml.From = "testuser@admin.com"
 objEml.To = "sampleuser@admin.com"
 objEml.Subject = "Sample Message"
 objEml.Textbody = "Test Message from Test User"
 objEml.Send
 Msgbox "Mail Sent!!"

Please note that the script will work only where SMTP Service has been installed.