陶益數碼工作室-Dreamweaver開發ASP視頻教程
你的位置:首頁 >>> 站內幫助 >>> VIP熱點問題 >>> 2.45教程配套代碼-防注入攻擊代碼
VIP技術支持中心
歡迎你訪問熱點問題!我們回答了會員大量的問題,請搜索你想要的 
2.45教程配套代碼-防注入攻擊代碼
問題類型 學習教程中的問題 提交時間 2010-05-15 12:55:00

2.45教程配套代碼:

<%
Response.Buffer = True  '緩存頁面
'防范get注入
If Request.QueryString <> ""  Then StopInjection(Request.QueryString)
'防范post注入
If Request.Form <> ""  Then StopInjection(Request.Form)
'防范cookies注入
If Request.Cookies <> ""  Then StopInjection(Request.Cookies)

'正則子函數
Function StopInjection(Values)
Dim regEx
Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True
    regEx.Pattern = "'|;|#|([\s\b+()]+([email=select%7Cupdate%7Cinsert%7Cdelete%7Cdeclare%[email protected]%7Cexec%7Cdbcc%7Calter%7Cdrop%7Ccreate%7Cbackup%7Cif%7Celse%7Cend%7Cand%7Cor%7Cadd%7Cset%7Copen%7Cclose%7Cuse%7Cbegin%7Cretun%7Cas%7Cgo%7Cexists)[/s/b]select|update|insert|delete|declare|@|exec|dbcc|alter|drop|create|backup|if|else|end|and|or|add|set|open|close|use|begin|retun|as|go|exists)[\s\b[/email]+]*)"
    Dim sItem, sValue
    For Each sItem In Values
        sValue = Values(sItem)
        If regEx.Test(sValue) Then
            Response.Write "<Script Language=javascript>alert('非法注入!你的行為已被記錄!!');history.back(-1);</Script>"
            Response.End
        End If
    Next
    Set regEx = Nothing
End function
%>

[相關內容]
 2.6 制作注冊會員頁面的驗證碼配套資料
 2.7 使用驗證碼的刷新和語音功能配套資料
 2.8 制作無刷新檢測用戶名功能配套資料
 2.9 使用密碼強度判斷功能配套資料
 2.10 在注冊會員頁面使用md5加密配套資料
 2.15 對登錄頁面進行JS數據驗證配套資料
 2.16 使用JS驗證注冊的用戶名配套資料
 2.20 使用JMAIL向注冊用戶發送郵件配套資料
 2.24 顯示會員注冊IP的地理位置配套資料
 2.21 使用緩存讓頁面記住登錄的用戶名配套資料

會員中心 意見建議 獲取VIP 聯系我們 付款方式 版權聲明
陶益數碼工作室 Ty502.com Copyright © 2006 版權所有 黔ICP備11000612號


江苏7位数19065期开奖结果