5_3.asp
来自「《asp网页设计》作者沈才梁源代码,共十章」· ASP 代码 · 共 27 行
ASP
27 行
<html><head><title>滚动文本框演示</title></head>
<body>
<%
Dim Contents,Contents2
Contents = request("Contents")
Contents2= Replace(Contents,VbCrlf,"<br>")
'用Replace函数把变量Contents中的回车换行符VbCrlf转换成HTML语言中的换行符<BR>
%>
<form method="POST" action="5_3.asp">
显示1、不转换换行符VbCrlf,直接显示在滚动文本框上:<br>
<Textarea Rows="4" Name="Contents" Cols="53"><%=Contents%></Textarea>
<p><input type="submit" value="提交" name="B1">
<input type="reset" value="全部重写" name="B2"></p>
</form>
显示2、把换行符VbCrlf转换成HTML语言换行标记<BR>显示在滚动文本框上:<HR>
<Textarea Rows="4" Name="Contents2" Cols="53" Readonly>
<%= Contents2 %>
</Textarea>
<br><br>
显示3、不转换换行符VbCrlf,直接显示在页面上:<HR>
<%=Contents%>
<BR><BR><BR>
显示4、把换行符VbCrlf转换成HTML语言换行标记<BR>显示在页面上:<Hr>
<%= Contents2%>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?