NEWSZW_HZH_BEGIN-->

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

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]

NEWSZW_HZH_END-->