Hello,
This is driving me crazy. I have a table from which I send emails. We send
out 16 different letters so the database keeps track of which letter is the
next letter to be mailed. So I have a subroutine "Email" which I use to
send all the email from my system.
Then I have the following code snippet from the letter sending program
Now this is what is happening. If the RS("Letter") is a single digit number
then the link that is sent in the email is missing the "." right before the
html in the href of the link.
If I send the email with htmlMode=1 then all is right but if I send the
email with htmlMode=0 then then the "." disappears from the link for single
digit letter numbers.
I am totally confused.
Any help would be greatly apprecitated.
LetterLink = "<a
href=""http://www.cditelecom.com/Members/Marketing/leads/letters/letter";
LetterLink = LetterLink & CINT(RS("Letter")) + 1 & ".html"">"
strBody2 = strBody2 & "To view letter " & RS("Letter") & ", please click " &
LetterLink & "here.</a>"
email TRIM(RS("CDIMemberEmail")),"[EMAIL PROTECTED]","One of your leads
has been sent a letter",strBody2,0,""
SUB email(strTo,strfrom,strSubject,strBody,htmlMode,bcc)
On Error Resume Next
Dim objCDO
Set objCDO = Nothing
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To= StrTo
If bcc <> "" THEN
objCDO.BCC = bcc
END IF
objCDO.From = strFrom
objCDO.Subject = StrSubject
objCDO.BodyFormat = HtmlMode
objCDO.MailFormat = HtmlMode
objCDO.body= strBody
objCDO.Send
END SUB
---
You are currently subscribed to activeserverpages as: [email protected]
To unsubscribe send a blank email to [EMAIL PROTECTED]
