推薦：如何防止access數(shù)據(jù)庫(kù)被下載的代碼
首先，如果只是直接將access數(shù)據(jù)庫(kù)的后綴名改為.asp是無(wú)法防止下載的，正確的做法是，建立一個(gè)表，為這個(gè)表中寫(xiě)入二進(jìn)制文件，即OLE對(duì)象。具體代碼如下: % DimDB,RS,SQL DB=DB.asp’這里改成你的數(shù)據(jù)庫(kù)，后綴一定要是asp SetConn=Server.CreateObject(Adod

引用:
Dim adoComm
’// 創(chuàng)建一個(gè)對(duì)象，我們用來(lái)調(diào)用存儲(chǔ)過(guò)程
Set adoComm = CreateObject("ADODB.Command")
With adoComm
        ’// 設(shè)置連接，設(shè) adoConn 為已經(jīng)連接的 ADODB.Connection 對(duì)象
        .ActiveConnection = adoConn
        ’// 類型為存儲(chǔ)過(guò)程，adCmdStoredProc = 4
        .CommandType = 4
        ’// 存儲(chǔ)過(guò)程名稱
        .CommandText = "upUserLogin"
        ’// 設(shè)置登錄名稱
        .Parameters.Item("@strLoginName").Value = "***"
        ’// 設(shè)置登錄密碼
        .Parameters.Item("@strLoginPwd").Value = "123456"
        ’// 執(zhí)行存儲(chǔ)過(guò)程
        .Execute
        
        ’// 判斷是否登錄成功
        If .Parameters.Item("@blnReturn").Value = 1 Then
                Response.Write "恭喜你，登錄成功！"
        Else
                Response.Write "不是吧，好像錯(cuò)了哦。。。"
        End If
End With
’// 釋放對(duì)象
Set adoComm = Nothing

　　通過(guò)以上的步驟，簡(jiǎn)單用戶登錄驗(yàn)證過(guò)程也做完了，現(xiàn)在只要把它整合到程序中就可以實(shí)現(xiàn)簡(jiǎn)單的用戶登錄驗(yàn)證了，關(guān)于其他細(xì)節(jié)就由你自己來(lái)處理了。
　　上面介紹的兩個(gè)存儲(chǔ)過(guò)程都是只返回一個(gè)值的，下面我們來(lái)看一個(gè)返回一個(gè)記錄集的存儲(chǔ)過(guò)程。

引用:
Create PROC upGetUserInfos
@intUserGroup        INT
AS
BEGIN
        -- 從數(shù)據(jù)庫(kù)中抽取符合條件的數(shù)據(jù)
        Select uName,uGroup,uLastLogin FROM uUser Where uGroup=@intUserGroup
        -- 插入一列合計(jì)
        UNION
        Select ’合計(jì)人數(shù):’,COUNT(uGroup),NULL FROM uUser Where uGroup=@intUserGroup
END

　　現(xiàn)在我們來(lái)看一下ASP程序的調(diào)用。

引用:
Dim adoComm
Dim adoRt
’// 創(chuàng)建一個(gè)對(duì)象，我們用來(lái)調(diào)用存儲(chǔ)過(guò)程
Set adoComm = CreateObject("ADODB.Command")
Set adoRs = CreateObject("ADODB.Recordset")
With adoComm
        ’// 設(shè)置連接，設(shè) adoConn 為已經(jīng)連接的 ADODB.Connection 對(duì)象
        .ActiveConnection = adoConn
        ’// 類型為存儲(chǔ)過(guò)程，adCmdStoredProc = 4
        .CommandType = 4
        ’// 存儲(chǔ)過(guò)程名稱
        .CommandText = "upGetUserInfos"
        ’// 設(shè)置用戶組
        .Parameters.Item("@intUserGroup").Value = 1
        ’// 執(zhí)行存儲(chǔ)過(guò)程，和以上幾個(gè)例子不同，這里使用RecordSet的Open方法
        adoRs.Open adoComm
        ’// 顯示第一個(gè)值
        Response.write adoRs.Fields(0).Value
End With
’// 釋放對(duì)象
Set adoRs = Nothing
Set adoComm = Nothing

　　這是一個(gè)簡(jiǎn)單的存儲(chǔ)過(guò)程應(yīng)用例子，存儲(chǔ)過(guò)程的用處不僅僅只有這些，它還有更強(qiáng)的功能，比如使用游標(biāo)、臨時(shí)表來(lái)從多個(gè)表，甚至是多個(gè)數(shù)據(jù)庫(kù)中調(diào)用數(shù)據(jù)，然后返回給用戶等等，這些我們以后再講。 

分享：淺析js返回字符串中某個(gè)字符的出現(xiàn)次數(shù)
使用此函數(shù)能返回字符串中某個(gè)字符或字符串出現(xiàn)的次數(shù)其中mainStr為要查找的字符串,subStr為要檢查的字符串或字符 function countInstances(mainStr, subStr) { var count = 0; var offset = 0; do { offset = mainStr.indexOf(subStr, offset); if(offset !=