baldwingrand
02-12-2009, 01:38 PM
I have a form that, upon submission, sends an email to a particular group. There is quite a bit in the email, so I have put the contents in a table. All is working well, except for the "Comments" text area. This area can accept 200 characters, and in the email, all 200 characters display on one line. The user doesn't always enter a carriage return in the text field- so, how can I get this text to display in the cell with carriage returns? I have tried to restrict the width of the cells...to no avail. Any help appreciated. Thanks.
.HTMLBody = .HTMLBody & "<table border='1' width= '800'><tr><td colspan= '2' bgcolor='#CCCC99'><strong>Information</strong></td>" & vbCrLF & "</tr>"
.HTMLBody = .HTMLBody & "<tr><td width='400'><strong>Comments</strong>: </td><td width='400'>" & Replace(Request.Form("txtComments"), vbCrLf, "<br>") & "</td></tr></table>"
<textarea name="txtComments" id="txtComments" cols="100" rows="2"></textarea>
.HTMLBody = .HTMLBody & "<table border='1' width= '800'><tr><td colspan= '2' bgcolor='#CCCC99'><strong>Information</strong></td>" & vbCrLF & "</tr>"
.HTMLBody = .HTMLBody & "<tr><td width='400'><strong>Comments</strong>: </td><td width='400'>" & Replace(Request.Form("txtComments"), vbCrLf, "<br>") & "</td></tr></table>"
<textarea name="txtComments" id="txtComments" cols="100" rows="2"></textarea>