<% dim strRecepient select case Request.Form("mail") case "web" strRecepient = "[email protected]" case "admin" strRecepient = "[email protected]" Set JMail = Server.CreateObject("JMail.SMTPMail") ´ This is my local SMTP server JMail.ServerAddress = "nt2.intervision.co.il" ´ This is me.... JMail.Sender = "[email protected]" JMail.Subject = "hello" ´ Get the recipients mailbox from a JMail.AddRecipient strRecepient JMail.Body = "Salom" ´ Send it... JMail.Execute End Select %>
