<%@ Language="VBscript" %> <% Option Explicit %> <html> <head> <title>Message Sent</title> </head> <body> <% 'declare the variables that will receive the values 'receive the values sent from the form and assign them to variables 'note that request.form("name") will receive the value entered into the textfield 'called name, and so with email and message Dim name, email, rin, message, NewMailObj name=request.form("name") email=request.form("email") rin=request.form("rin") message=request.form("message") 'create the mail object and send the details Set NewMailObj=Server.CreateObject("CDONTS.NewMail") NewMailObj.From = "mysite@mysite.com" NewMailObj.To = "me@mysite.com" NewMailObj.Subject = "New message sent.." NewMailObj.Body = "the name entered was " & name & _ "<br>the email was " & email & _ "<br>the rin was " & rin & _ "<br>the message was:- <br> " & message 'you need to add the following lines FOR the mail to be sent in HTML format NewMailObj.BodyFormat = 0 NewMailObj.MailFormat = 0 NewMailObj.Send 'Close the email object and free up resources Set NewMailObj = nothing Response.write "The email was sent, please use your back button to continue." %> </body> </html>
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)