表单对象textarea内容的格式控制(回车、换行、空格)
发布时间:2006-10-14 8:54:17   收集提供:gaoqian

<!--1.htm-->

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<form name="form1" method="post" action="t.asp">
  <p>
    <textarea name="textarea" cols="50" rows="10"></textarea>
  </p>
  <p>    <input type="submit" name="Submit" value="提交">
    <input type="reset" name="Submit2" value="重置">
    </p>
</form>
</body>
</html>

<!--t.asp-->

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<%
dim msg
msg=request.Form("textarea")
msg=replace(msg,vbcrlf,"<br>")
msg=replace(msg," ","&nbsp;")
response.write msg
%>

</body>
</html>

 
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50