ASP应用中如何限制同一表单被多次提交
2008-12-16 23:16
441 查看
在Internet上我们每天都会遇到数不清的表单,也看到其中大部分并没有限制用户多次提交同一个表单。缺乏这种限制有时候会产生某些预料不到的结果,如重复订阅邮件服务或重复投票等。
本文介绍在ASP应用中防止用户在当前会话期间多次提交同一表单的一个简单方法。它主要由四个子程序组成,在较为简单的应用场合,你只要将这些代码放在包含文件中直接引用即可;对于那些较为复杂的环境,我们在文章的最后给出一些改进建议。
一、基本工作过程
下面我们依次讨论这四个子程序。
(一)初始化
这里我们要在Session对象中保存两个变量,其中:
⑴ 每一个表单对应一个称为FID的唯一标识,为使该值唯一要用到一个计数器。
⑵ 每当一个表单成功提交,必须在一个Dictionary对象中存储它的FID。
我们用一个专用的过程来初始化上述数据。虽然以后各个子程序都要调用它,但实际上每一个会话期间它只执行一次:
(二)生成表单的唯一标识符
下面这个函数GenerateFID()用于生成表单的唯一标志。该函数首先将FID值加1,然后返回它:
(三)登记已提交表单
当表单成功地提交时,在Dictionary对象中登记它的唯一标识:
(四)检查表单是否重复提交
在正式处理用户提交的表单之前,应该在Dictionary对象中检查它的FID是否已经登记。下面的CheckFID()函数用来完成这个工作,如已经登记,它返回FALSE,否则返回TRUE:
二、如何使用
有两个地方要用到上述函数,即表单生成时与结果处理时。假设上述四个子程序已经放入包含文件Forms.inc中,下面的代码根据FID值来决定生成表单还是处理表单结果,它所描述的处理过程适合于大多数ASP应用:
GenerateForm负责生成表单,表单中应该含有一个隐藏的FID,如:
ProcessForm负责处理通过表单提交的内容,但在处理之前应该先调用CheckFID()检查当前表单是否已经提交,代码类如:
本文介绍在ASP应用中防止用户在当前会话期间多次提交同一表单的一个简单方法。它主要由四个子程序组成,在较为简单的应用场合,你只要将这些代码放在包含文件中直接引用即可;对于那些较为复杂的环境,我们在文章的最后给出一些改进建议。
一、基本工作过程
下面我们依次讨论这四个子程序。
(一)初始化
这里我们要在Session对象中保存两个变量,其中:
⑴ 每一个表单对应一个称为FID的唯一标识,为使该值唯一要用到一个计数器。
⑵ 每当一个表单成功提交,必须在一个Dictionary对象中存储它的FID。
我们用一个专用的过程来初始化上述数据。虽然以后各个子程序都要调用它,但实际上每一个会话期间它只执行一次:
以下为引用的内容: Sub InitializeFID() If Not IsObject(Session("FIDList")) Then Set Session("FIDList")=Server.CreateObject("Scripting.Dictionary") Session("FID")=0 End If End Sub |
下面这个函数GenerateFID()用于生成表单的唯一标志。该函数首先将FID值加1,然后返回它:
以下为引用的内容: Function GenerateFID() InitializeFID Session("FID") = Session("FID") 1 GenerateFID = Session("FID") End Function |
当表单成功地提交时,在Dictionary对象中登记它的唯一标识:
以下为引用的内容: Sub RegisterFID() Dim strFID InitializeFID strFID = Request("FID") Session("FIDlist").Add strFID, now() End Sub |
在正式处理用户提交的表单之前,应该在Dictionary对象中检查它的FID是否已经登记。下面的CheckFID()函数用来完成这个工作,如已经登记,它返回FALSE,否则返回TRUE:
以下为引用的内容: Function CheckFID() Dim strFID InitializeFID strFID = Request("FID") CheckFID = not Session("FIDlist").Exists(strFID) End Function |
有两个地方要用到上述函数,即表单生成时与结果处理时。假设上述四个子程序已经放入包含文件Forms.inc中,下面的代码根据FID值来决定生成表单还是处理表单结果,它所描述的处理过程适合于大多数ASP应用:
以下为引用的内容: < %Option Explicit%> < !--#include file="forms.inc" < HTML> < HEAD> < TITLE>表单提交测试< /TITLE> < /HEAD < BODY> < % If Request("FID") = "" Then GenerateForm Else ProcessForm End If %> < /BODY> < /HTML> |
以下为引用的内容: < % Sub GenerateForm() %> < form action="< %=Request.ServerVariables("PATH_INFO")%>" method=GET> < input type=hidden name=FID value="< %=GenerateFID()%>"> < input type=text name="param1" value=""> < input type=submit value="OK"> < /form> < % End Sub %> |
以下为引用的内容: < % Sub ProcessForm() If CheckFID() Then Response.Write "你输入的内容是" |
相关文章推荐
- 在ASP应用中如何限制同一表单被多次提交
- 在ASP中限制同一表单被多次提交
- 在ASP中限制同一表单被多次提交
- 在ASP中限制同一表单被多次提交
- asp中如何限制重复提交同一表单 出处:asp技术版区
- 在ASP.NET登录页面中如何实现文本框焦点自动跳转及通过回车键提交表单
- ASP.NET MVC 3.0:基于Ajax的表单提交,A页面认证失败后页面被强转至登录页面,待登录成功将如何回到A页面?
- asp.net mvc 表单重复提交问题。如何解决呀?
- ASP如何利用XMLHTTP实现表单的提交以及cookies或session的发送和Referer
- ASP小偷程序如何利用XMLHTTP实现表单的提交以及cookies或session的发送
- Ajax+asp应用实例: 注册模块,表单提交
- [ASP.NET]如何在表单提交(form,submit)后保持select的选择值
- 关于Asp.Net中避免用户连续多次点击按钮,重复提交表单的处理
- 关于Asp.Net中避免用户连续多次点击按钮,重复提交表单的处理
- Ajax+asp应用实例 注册模块,表单提交
- 在ASP应用程序中限制重复提交同一表单
- 关于Asp.Net中避免用户连续多次点击按钮,重复提交表单的处理
- 如何防止多次提交同一个表单?
- Ajax+asp应用实例 注册模块,表单提交
- asp小偷程序如何利用xmlhttp实现表单的提交以及cookies或session的发送