dbWriter send e-mail using CONTS ASP code
First of all run dbWriter's
component checker on your site to see if CDONTS has been loaded.
ASP code to send email using a CDONTS NewMail object (Microsoft Collaboration Data
Objects for Windows NT Server).
Note the "vbCrLf" added
in the e-mail text. This vb code adds carriage returns in the
e-mail body.
<%
DIM objCDO
DIM strEmail
DIM strPass
strEmail = trim(Request.Form("txtEmail"))
strPass = trim(Request.Form("txtPassword"))
strSubject = "Welcome to dbWriter.com"
strEmailBody = strEmail
strEmailBody = strEmailBody & vbCrLf & vbCrLf & "Thank-you for
registering with dbWriter.com."
strEmailBody = strEmailBody & vbCrLf & vbCrLf & "Username: - " &
strEmail
strEmailBody = strEmailBody & vbCrLf & "Password: - " & strPass
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = strEmail
'objCDO.CC = "?????@?????.com"
objCDO.From = "Support@dbWriter.com"
objCDO.Subject = strSubject
objCDO.Body = strEmailBody
objCDO.MailFormat = 0
objCDO.Importance = 1
objCDO.Send
Set objCDO = Nothing
%> |
|
