国产中文视频-国产中字-国产中的精品一区的-国产午夜a理论毛片在线影院-91桃色视频-91桃色视频在线观看

ASP網站的動態參數傳遞一直是個不小的安全問題，如不進行安全過濾經常會被黑客利用，一般的注入便是由于網站設計時沒有注意好傳遞過來的參數進行過濾，比如http://m.zsrxys.cn/news.asp?id=5直接用request("id")來獲取ID=5，黑客則可輕易利用此入侵。

下面教你兩種方法簡單防御：
方法一：
<%'過濾安全字符
Function SafeRequest(ParaName,ParaType)
'--- 傳入參數 ---
'ParaName:參數名稱-字符型
'ParaType:參數類型-數字型(1表示以上參數是數字，0表示以上參數為字符)

Dim ParaValue
ParaValue=Request(ParaName)
If ParaType=1 then
If not isNumeric(ParaValue) then
Response.write "參數" & ParaName & "必須為數字型！<br /><br />"
Response.end
End if
Else
ParaValue=replace(ParaValue,"'","''")
 ParaValue = Replace(ParaValue, "select", "sel&#101;ct")
 ParaValue = Replace(ParaValue, "join", "jo&#105;n")
 ParaValue = Replace(ParaValue, "union", "un&#105;on")
 ParaValue = Replace(ParaValue, "where", "wh&#101;re")
 ParaValue = Replace(ParaValue, "insert", "ins&#101;rt")
 ParaValue = Replace(ParaValue, "delete", "del&#101;te")
 ParaValue = Replace(ParaValue, "update", "up&#100;ate")
 ParaValue = Replace(ParaValue, "like", "lik&#101;")
 ParaValue = Replace(ParaValue, "drop", "dro&#112;")
 ParaValue = Replace(ParaValue, "create", "cr&#101;ate")
 ParaValue = Replace(ParaValue, "modify", "mod&#105;fy")
 ParaValue = Replace(ParaValue, "rename", "ren&#097;me")
 ParaValue = Replace(ParaValue, "alter", "alt&#101;r")
 ParaValue = Replace(ParaValue, "cast", "ca&#115;t")
 ParaValue = Replace(ParaValue, "and", "an&#100;")
 ParaValue = Replace(ParaValue, "or", "o&#114;")
End if
SafeRequest=ParaValue
End function

%>

用法：當傳遞過來的參數ID為數字時，用safeRequest("id",1)接收；當傳遞的ID為字符時，用safeRequest("id",0)接收，這樣便可防御一般黑客的參數注入。

方法二：
簡單過濾黑客需要用到的常用注入符號：<%id=replace(request("id"), " ' ", " ' ' ")%>