ASP.NET Forum

**PhilR714** · 02-04-2005, 11:57 PM

I have created a form in Dreamwaever that gets information from a person. I want to send it to an email address without bringing up the senders default email client when they hit submit. I contacted the hosting company and they suggested using aspemail from www.aspemail.com . The problem is I cannot figure out how to modify the code to include fields other than the ones they use. It is supposedly customizable. The code sample is located at http://www.aspemail.com/manual_02.html. They don't offer phone support so I emailed them my questions. Does anyone know of any other way I can accomplish this task. Any and all help would be appreciated.
Phil

**Minaki** · 02-05-2005, 04:06 PM

Look up some CDOSYS examples (Or CDONTS if you're on an old NT Server).
Very easy to use. You just create the object, tell it the from, to, subject, body etc. of your e-mail, then send it.

**dexterz** · 02-08-2005, 12:43 PM

Here is a quick CDONTS example:

I've use this in my site.

Assume you have a form fields each name correspond to the ASP request.form variable.

Code'

<%

Dim strEmailBody, strRating, strAuthorName, strComment, strEmailAddress, strWebmasterEmail, strAuthorHomepage, strSubject

strSubject = Request.Form("SUBJECT")
strAuthorName = Request.Form("AUTHOR")
strEmailAddress = Request.Form("EMAIL")
strAuthorHomepage = Request.Form("HOMEPAGE")
strWebmasterEmail = Request.Form("FROM")
strComment = Request.Form("COMMENT")

strEmailBody = strEmailBody & " Hello: " & strAuthorName
strEmailBody = strEmailBody & " Thank You For Joining."
strEmailBody = strEmailBody & " at www.mydomain.com"
strEmailBody = strEmailBody & " Info Submitted Info:"
strEmailBody = strEmailBody & " Name: " & strAuthorName
strEmailBody = strEmailBody & " E-mailL: " & strEmailAddress
strEmailBody = strEmailBody & " Homepage: " & strAuthorHomepage
strEmailBody = strEmailBody & " Comment Made: " & strComment
strEmailBody = strEmailBody & " Webmaster,"
strEmailBody = strEmailBody & " www.mydomain.com"
strEmailBody = strEmailBody & " Once again thank you!"

Dim objCDO

Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.From = "<" & strWebmasterEmail & ">" '

'Who the e-mail is sent to - Recipient's E-mail address
objCDO.To = "<" & strEmailAddress & ">"

'Use to send blind copy to webmaster.
objCDO.bcc = "<" & strWebmasterEmail & ">"

'The subject of the e-mail
objCDO.Subject = strSubject

'The main body of the e-amil
objCDO.Body = strEmailBody

'Set the e-mail body format (0=HTML 1=Text)
objCDO.BodyFormat = 0

'Set the mail format (0=MIME 1=Text)
objCDO.MailFormat = 0

'Send the e-mail
objCDO.Send()

Set objCDO = Nothing

%>

**PhilR714** · 02-08-2005, 06:12 PM

Thanks for all the help. I was able to resolve the problem by using a tutorial I was lead to at http://www.webthang.co.uk/default.asp. I needed to understand how to build the body variable and it was very helpful. Now that I see how it is done it is a simple process.