How to send email !!!!!

[NEO]

<%

Dim objMail
set objMail = Server.CreateObject("CDONTS.NewMail")

'SPECIFY ALL MAIL PREFERENCES
objMail.From = "webmaster@yourhost.com" 'or request.form("from")
objMail.Subject = "Test mail!" ' or request.form("subject")
objMail.To = request.form("email")
objMail.Cc = ""
objMail.Bcc = ""

strBody = "Message goes here" 'or request.form("message")

'SPECIFY THE EMAIL FORMAT
objMail.MailFormat = cdoMailFormatMime
objMail.BodyFormat = cdoBodyFormatHTML
objMail.Body = strBody

'SEND EMAIL
objMail.Send
SET objMail = nothing


Response.write("message sent !!")
%>

This is just a simple way to send email on your website!

I only know how to send email using CDONTS!
If anyone knows any other ways, e.g Jmail then please post! ;)