<% Dim MyMail Set MyMail = Server.CreateObject("JMail.SMTPMail") MyMail.ServerAddress = "localhost" MyMail.Sender = "test@libbyhathorn.com" MyMail.AddRecipient "chao@4mation.com.au" MyMail.Subject = "Test Email using Jmail" MyMail.Body = "This is a test email message" & vbcrlf & "sent with Jmail" MyMail.Execute Set myMail=nothing Response.Write("Your e-mail has been sent") %>