<%
Dim JMail
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "smtpin.livedns.co.il"
JMail.AddRecipient "sendto@email.com" ' the email it will be sent to
JMail.Sender = "sentfrom@Email.com" ' the email it will be sent from
JMail.Subject = "Your subject"
JMail.ContentType = "text/html"
JMail.Body = "Hi just testing out this JMail component."
JMail.Execute
Set JMail= Nothing
%>