I am trying to get a CDO mail message to include the values a user entered in a form to display in the body of an email message. The email is going fine but the body is blank. Any thoughts?

I am rather new to UD but have a decent handle on it. Any shoves in the right direction would be greatly appreciated.

Try this:


'The header/footer for the email
Const Header = "Start Message"
Const Footer = "End Message"

'The elements of the Form
varOne = Request("textOne"
varTwo = Request("textTwo"
varThree = Request("textThree"

mail_Body = Header & vbCrLf & vbCrLf
mail_Body = mail_Body & "Your Label: " & varOne & vbCrLf
mail_Body = mail_Body & "Your Label: " & varTwo & vbCrLf
mail_Body = mail_Body & "Your Label: " & varThree & vbCrLf
mail_Body = mail_Body & vbCrLf & vbCrLf & Footer

'Create the mail object and send the mail
Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail"
objCDO.To = " "
objCDO.From = " "
objCDO.Subject = "Your Subject"
objCDO.Body = mail_Body
objCDO.Send
Set objCDO = Nothing


Regards

Owen.

Owen, Thanks. That worked out great!