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"
%>