1，表单发OutLook邮件 ASP的
<%
submitname=request.form("submit")
if submitname="submit" then
email=request.form("email")
cc=request.form("cc")
subject=request.form("subject")
body=request.form("body")
response.redirect("mailto:"&email&"?cc="&cc&"&subject="&subject&"&body="&body)
else
%>
<form name="form1" method="post" action="email.asp">
email:<input name="email"><br>
cc:<input name="cc"><br>
subject:<input name="subject"><br>
body:<input name="body"><br>
<input type="submit" name="submit" value="submit">
</form>
<%end if%>
2，练习使用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=str
end function
function 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=str
end 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=str
end 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)))%> 最后，不知道大家有没有玩过这样的一个程序 ：很令人讨厌的，让你永远关不掉的程序页面。
只做程序调试，不要去作弄别人。 以下文件保存为bug.html
发现该文件关不了了？（当然你要关闭，把源代码修改下）
那现在的要求是：计算关闭的次数，如果超过多少次就可以自行关闭，那下面就采用到session
以下文件保存为bug.asp
<%if session("num") < 2 then%>
<body onunload=javascript:window.open("bug.asp")>
<%session("num")=session("num")+1%>
<%else%>
<script>
self.close()
</script>
<%end if%>
呵呵，当你关闭三次以后，窗口就再也不弹出了。了解吧：）
以上就是对Session对象的加深学习
