formtest.asp
' 表單文件.
%
Randomize
' 初始化隨機數(shù)種子.
num1=rnd()
' 產(chǎn)生隨機數(shù).
num1=int(26*num1)+65
' 修改num1的范圍,使其是A-Z范圍的Ascii碼,防止表單名出錯.
session("antry")="test"chr(num1)
' 產(chǎn)生隨機字符串.
%>
form name="test" action="testact.asp" method="post">
您的姓名：input type='text' name='' size=30>
' 使用隨機表單項名.
input type='submit' value='現(xiàn)在提交'>
/form>
testact.asp
' 表單處理
%
teststr=request.form(session("antry"))
if teststr="" then
response.write "噢,沒有填寫用戶名或已經(jīng)提交!"
' 如果session("antry")為空,則判斷為用戶沒有填寫名字或表單已經(jīng)提交過一次.
else
response.write teststr
session("antry")=""
' 提交成功.清空session("antry"),以防被再次提交.
end if
%>
[1]
