<html>
<head>
<title>ThaiCreate.Com Tutorial</title>
</head>
<body>
<%
Dim txtVol
Response.write("Textarea= "&Request.Form("txtDescription").Count)
Response.write("<hr>")
For Each txtVol in Request.Form("txtDescription")
Response.write Replace(txtVol,vbCrLf,"<br>")
Response.write "<hr>"
Next
%>
</body>
</html>