Mailenable Component - Mail Code
<%@ Language=VBScript %>
 <%
 
 Dim oMail
 
 Set oMail = server.CreateObject("MEMail.Message")
 
 oMail.MailFrom = "yourmail@yourdomain.com"
 oMail.MailFromDisplayName = "DisplayName"
 oMail.ContentType = "text/html;"
 oMail.MailTo ="mail@anydomain.com"
 oMail.Subject = "SubjectName"
 oMail.MessageBody = "Hello there,Welcome to our new service."
 
 oMail.SendMessage
 
 Set oMail = Nothing
 
 Response.Write "success"
 %>