变态重口极致另类在线-波多久久夜色精品国产-波多野结衣在线观看一区-波多野结衣在线观看一区二区-污污的网站免费阅读-污污视频网址

當前位置: 首頁IT技術 → ASP中如何防止同一份表單被重復提交

ASP中如何防止同一份表單被重復提交

更多

這篇文章主要跟大家分享學習的是關于在ASP應用中如何限制同一表單被多次提交,希望能給大家帶來幫助或啟發。

在Internet上我們每天都會遇到數不清的表單,也看到其中大部分并沒有限制用戶多次提交同一個表單。缺乏這種限制有時候會產生某些預料不到的結果,如重復訂閱郵件服務或重復投票等。

  本文介紹在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>

  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或數據庫來保存相關數據了。

  ⑶ 這種方法是不安全的。它僅用于防范誤操作,不能防止熟練用戶有意地多次提交同一表單。

熱門評論
最新評論
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字數: 0/500 (您的評論需要經過審核才能顯示)
主站蜘蛛池模板: 日韩精品一区二区三区中文字幕 | 美女秘密视频白丝 | 大伊人网 | 黄色高清在线观看 | 久久精品国产无限资源 | 欧美在线a级高清 | 国产青青草 | 特级淫片aaaa毛片aa视频 | 国产成人免费在线视频 | 亚洲日韩aⅴ在线视频 | 看看黄色毛片 | 在线 成人 | 国产日韩欧美精品在线 | 五月婷婷在线播放 | 日韩精品综合 | 日本不卡在线 | h网站在线播放 | 日本中文字幕在线观看 | 最近韩国日本免费观看mv免费版 | 国产一级特黄全黄毛片 | 国产精品亚洲片在线观看不卡 | 色综合激情 | 狠狠色狠狠色综合系列 | 高h喷水荡肉爽文各种场合 高h喷水荡肉爽文np欲 | 一级视频免费观看 | 国产三级在线看 | 亚洲午夜成激人情在线影院 | 超薄肉色丝袜精品足j福利 超级碰人人 | 免费被黄网站在观看 | 国产成人精品福利网站在线观看 | 香蕉国产人午夜视频在线观看 | 中文字幕在线观看一区二区 | 精品久久久久免费极品大片 | 狠狠干97 | 国产成人一级片 | 狠狠色综合色综合网站嗯 | 亚洲欧美日本韩国综合在线观看 | 就爱干草视频 | 亚洲视频在线不卡 | 久久欧洲视频 | 在线精品视频播放 |