提供了编程的基础技术教程

zl程序教程

您现在的位置是：首页 >  移动开发

当前栏目

一些简单的ASP练习

ASP 简单 一些 练习
2023-06-13 09:13:52 时间
1，练习使用request对象接受数据，并且综合运用些函数。

cnbruce.html

<formaction="cnbruce.asp"method="post">
<inputtype="text"name="title"><br>
<textareaname="content"rows=10cols=20></textarea><br>
<inputtype="submit">
</form>


cnbruce.asp

<%
functionth(str)
str=replace(str,"妈的","MD")
str=replace(str,"靠","KAO")
th=str
endfunction

functionencode(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=str
endfunction
%>

<%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

<!--#includefile="http://www.cnbruce.com/blog/ubb.asp"-->
<%
functionth(str)
str=replace(str,"妈的","MD")
str=replace(str,"靠","KAO")
th=str
endfunction
%>

<script>
functionrunEx(cod1){
cod=document.all(cod1)
varcode=cod.value;
if(code!=""){
varnewwin=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)))%>

相关文章