为大家介绍如何在asp中防止用户重复提交数据，这里需要四个子程序，然后在实际的应用场合调用即可，基本可以满足需求。
一、四个子程序
1、初始化
要在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
2、生成表单的唯一标识符
下面这个函数GenerateFID()用于生成表单的唯一标志。该函数首先将FID值加1，然后返回它：
复制代码 代码示例:
Function GenerateFID()
InitializeFID
Session("FID") = Session("FID") + 1
GenerateFID = Session("FID")
End Function
3、登记已提交表单
当表单成功地提交时，在Dictionary对象中登记它的唯一标识：
复制代码 代码示例:
Sub RegisterFID()
Dim strFID
InitializeFID
strFID = Request("FID")
Session("FIDlist").Add strFID, now()
End Sub
4、检查表单是否重复提交
在正式处理用户提交的表单之前，应该在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>
GenerateForm负责生成表单，表单中应该含有一个隐藏的FID，如：
复制代码 代码示例:
<%%
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
%>
ProcessForm负责处理通过表单提交的内容，但在处理之前应该先调用CheckFID()检查当前表单是否已经提交，代码类如：
复制代码 代码示例:
<%%
Sub ProcessForm()
If CheckFID() Then
Response.Write "你输入的内容是" & Request.QueryString("param1")
RegisterFID
Else
Response.Write "此表单只能提交一次!"
End If
End Sub
%>
三、限制与改进措施
以上介绍了在当前会话期间限制同一表单被多次提交的一种方法。在实际应用中可能需要从多方面加以改进，例如：
⑴ 在登记表单ID之前检查用户输入数据的合法性，使得数据不合法时用户可以按“后退”按钮返回，在修正后再次提交同一表单。
⑵ 这种对表单提交的限制最多只能在当前会话期间有效。如果要求这种限制能够跨越多个会话，那么就要用到Cookeis或数据库来保存相关数据了。
在asp中实现这种需求，不太好操作，不如php或asp.net下灵活方便。
