如何拒绝同一张表单被多次提交？

formtest.asp

' 表单文件.

%

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]