<% Dim objNewMail Set objNewMail = Server.CreateObject("CDONTS.NewMail") objNewMail.From = request.form("sender_email") objNewMail.To = "info@yourname.com" objNewMail.Subject = "This is a test Mail" objNewMail.Body = request.form("message") objNewMail.Host = "mail.yourname.com" objNewMail.Send Set objNewMail = Nothing response.redirect "thankyou.htm" %>