1,练习使用request对象接受数据,并且综合运用些函数。cnbruce.html
<form action="cnbruce.asp" method="post"><input type="text" name="title"><br><textarea name="content" rows=10 cols=20></textarea><br><input type="submit"></form>cnbruce.asp
<%function th(str)str=replace(str,"妈的","MD")str=replace(str,"靠","KAO")th=strend functionfunction encode(str)str = replace(str, ">", ">")str = replace(str, "<", "<")str = Replace(str, CHR(32), " ")str = Replace(str, CHR(13), "")str = Replace(str, CHR(10) & CHR(10), "</P><P>")str = Replace(str, CHR(10), "<BR>")encode=strend function%><%title=request.form("title")content=request.form("content")%>文章标题:<%=th(title)%><hr>文章内容:<%=encode(th(content))%>th(str)为自定义函数,主要功能很简单:过滤字符。encode(str)也为自定义函数,主要功能是完整地显示被传递的信息。CHR(10)表示换行,CHR(13)表示回车,CHR(32)表示空格。附加功能:显示UBB代码。即ubb.asp中含有ubb()函数。增强的cnbruce.asp
<!--#include file="http://www.cnbruce.com/blog/ubb.asp"--><%function th(str)str=replace(str,"妈的","MD")str=replace(str,"靠","KAO")th=strend function%><script>function runEx(cod1) {cod=document.all(cod1)var code=cod.value;if (code!=""){var newwin=window.open('','',''); newwin.opener = null newwin.document.write(code); newwin.document.close();}}</script><%title=request.form("title")content=request.form("content")%>文章标题:<%=th(title)%><hr>文章内容:<%=ubb(unhtml(th(content)))%>
推荐阅读
ASP编程入门进阶(二十):ADO组件之分页程序
应该来说,学会了如何插入记录,如何显示记录,那么现在简单的完整的文章系统、新闻系统和留言系统不成问题。那接着下面的问题就是:随着信息内容的不段增加,单独通过一张页面显示所有信息是不行也是很不理性的。>>>详细阅读
本文标题:一些简单的ASP练习
地址:http://www.17bianji.com/kaifa2/ASP/32831.html
1/2 1