Forums

This topic is locked

Textarea fields and CDONTS

Posted 10 Dec 2004 19:26:08
1
has voted
10 Dec 2004 19:26:08 Robert Loverin posted:
I've created a page that e-mails the content of a form via CDONTS. I have a few textarea fields on it. Is there a way for me to retain the formatting of the textarea field in the e-mail message? For example, if a user writes a few sentences and uses hard returns to separate the lines, can I get the data to appear in the e-mail message the same way? Right now, the data appears in one long string.

Replies

Replied 13 Dec 2004 12:33:38
13 Dec 2004 12:33:38 Lee Diggins replied:
Hi Robert

I'm assuming you're trying to send the email as HTML or at least view the email in html. You need to do a find/replace on your string something like:

Replace(myString,vbcrlf,"<br>"

or if you need to use this as a function, something like:

Function FormatText(strInputText)

dim i
dim v
dim strOutput
dim strText

strText = strInputText

strOutput = ""

for i = 1 to len(strText)
v=mid(strText,i,1)
if v=chr(13) then
strOutput=strOutput & "<br>"
else
strOutput=strOutput & v
end if
next

FormatText = strOutput
End Function

And call the function like so:

FormatText(myString)

Digga

Sharing Knowledge Saves Valuable Time!!!

Reply to this topic