formtest.asp<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />
' 表单文件.
<%
Randomize
' 初始化随机数种子.
num1=rnd()
' 产生随机数.
num1=int(26*num1)+65
' 修改num1的范围,使其是A-Z范围的Ascii码,防止表单名出错.
session("antry")="test"&chr(num1)
' 产生随机字符串.
%>
<form name="test" action="testact.asp" method="post">
您的姓名：<input type='text' name='' size=30>
' 使用随机表单项名.
<input type='submit' value='现在提交'>
</form>
testact.asp
' 表单处理
<%
teststr=request.form(session("antry"))
if teststr="" then
response.write "噢,没有填写用户名或已经提交!"
' 如果session("antry")为空,则判断为用户没有填写名字或表单已经提交过一次.
else
response.write teststr
session("antry")=""
' 提交成功.清空session("antry"),以防被再次提交.
end if
%>
[1]
