Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

.html more than 1 line 1

Status
Not open for further replies.

foxup

Programmer
Dec 14, 2010
328
CA
Hi,

I have a prg which sends out emails. it works perfectly except that I would like to be able to write more that 1 long sentence. I want to be able to send chr(13) in the .html body line. The chr(13) doesn't seem to work. any help please.

Here is the code:
Local iMsg,iConf
Declare SHORT InternetGetConnectedState In wininet.Dll;
INTEGER @lpdwFlags, Integer dwReserved
lConnect=displayState()
If lConnect
iMsg = Createobject("CDO.Message")
iConf = Createobject("CDO.Configuration")
Flds = iConf.Fields
With Flds
.Item(" = 2
.Item(" = 'myserverip'
.Item(" = 25
.Update()
Endwith
With iMsg
.Configuration = iConf
.To = "myemailaddy"
.CC = ""
.BCC = ""
.From = "myemailaddy"
.Subject = "bll"
.Fields("Priority").Value = 1 && -1=Low, 0=Normal, 1=High
.Fields.Update()
&& .TextBody = "This is a reminder that you have to update your ticket #" && Plain text
.HTMLBody = "INTERNET ORDER COMPLETED! Internal Internet Order ID# "+dslorders.orderid +" for client "+dslorders.cname+" "+dslorders.accno+CHR(13)+CHR(13)+". Ticket opened by: "+ALLTRIM(dslorders.emp)&& Optional HTML message
.Send()
Endwith

Ai would like to be able to send "hi", chr(13), here are the details", (chr13), more stuf, chr13.

but chr(13) doesn;t seem to work here.

please help,
FOXUP
 
Hi

For HTML would you not need <BR> rather than a CrLf approach?

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.
 
Hmmm.. still doesn't
work

Here is the line:

.HTMLBody = "Here are the Results of the daily download"+<BR>"line 2"<BR>

any help?
 
I meant like this

Code:
.HTMLBody = "Here are the Results of the daily download<BR>line 2<BR>"


Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.
 
Nice Griff. Star for you. Thank you. :)
 
Cool, glad you're getting on ok!

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top