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

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

formtest.asp

' 表单文件.

<%

Randomize

' 初始化随机数种子.

num1=rnd()

' 产生随机数.

num1=int(26*num1)+65

' 修改num1的范围,使其是A-Z范围的Ascii码,防止表单名出错.

session("antry")="test"&chr(num1)

' 产生随机字符串.

%>

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]