欧美日韩精品在线,国内精品久久久久久久久,一级毛片恃级毛片直播,清纯唯美亚洲综合欧美色

ASP如何防止表單重復(fù)提交_ASP教程

編輯Tag賺U幣
教程Tag:暫無Tag,歡迎添加,賺取U幣!

推薦:如何解決left截取字符標(biāo)題長度不一
我們經(jīng)常看到直接用left截字符串時,因為標(biāo)題中會出現(xiàn)漢字和英文共存,所以造成兩條新聞標(biāo)題長度不一,為了解決這個問題我們可以使用下面這個函數(shù)。 % ’************************************************** ’函數(shù)名:gotTopic ’作用:截字符串,漢字一個算

用戶提交表單時經(jīng)常會遇到一些意外情況,比如多次刷新頁面、按了后退鍵等,如果不采取控制措施就會引起表單重復(fù)提交的問題。
本文介紹的這種防止方法,主要由四個子程序組成,在較為簡單的應(yīng)用場合,你只要將這些代碼放在包含文件中直接引用即可;對于那些較為復(fù)雜的環(huán)境,我們在文章的最后給出一些改進(jìn)建議。 

 一、基本工作過程

 下面我們依次討論這四個子程序。 

 (一)初始化

 這里我們要在Session對象中保存兩個變量,其中:

 ⑴ 每一個表單對應(yīng)一個稱為FID的唯一標(biāo)識,為使該值唯一要用到一個計數(shù)器。

 ⑵ 每當(dāng)一個表單成功提交,必須在一個Dictionary對象中存儲它的FID。

 我們用一個專用的過程來初始化上述數(shù)據(jù)。雖然以后各個子程序都要調(diào)用它,但實際上每一個會話期間它只執(zhí)行一次:

Sub InitializeFID()
If Not IsObject(Session("FIDList")) Then
Set Session("FIDList")=Server.CreateObject("Scripting.Dictionary")
Session("FID")=0
End If
End Sub

 (二)生成表單的唯一標(biāo)識符

 下面這個函數(shù)GenerateFID()用于生成表單的唯一標(biāo)志。該函數(shù)首先將FID值加1,然后返回它:
Function GenerateFID()
InitializeFID
Session("FID") = Session("FID") + 1
GenerateFID = Session("FID")
End Function

 (三)登記已提交表單

 當(dāng)表單成功地提交時,在Dictionary對象中登記它的唯一標(biāo)識:

Sub RegisterFID()
Dim strFID
InitializeFID
strFID = Request("FID")
Session("FIDlist").Add strFID, now()
End Sub

 (四)檢查表單是否重復(fù)提交
 在正式處理用戶提交的表單之前,應(yīng)該在Dictionary對象中檢查它的FID是否已經(jīng)登記。下面的CheckFID()函數(shù)用來完成這個工作,如已經(jīng)登記,它返回FALSE,否則返回TRUE:

Function CheckFID()
Dim strFID
InitializeFID
strFID = Request("FID")
CheckFID = not Session("FIDlist").Exists(strFID)
End Function

分享:解讀用asp編寫類似搜索引擎功能的代碼
首先建一個 access 數(shù)據(jù)庫 ,庫中有一個URLINDEX表,其中URL和Keywords字段分別添加了索引,如下: URL 文本(索引:有(無重復(fù))) Title文本 Description文本 Summary文本 Keywords文本(索引:有(無重復(fù))) 程序文件doquery.asp,代碼: HTMLHEADTITLE簡單搜索引擎

共2頁上一頁12下一頁
來源:模板無憂//所屬分類:ASP教程/更新時間:2010-02-01
相關(guān)ASP教程