推薦：ASP后門之終極偽裝
記得當年asp木馬出來的時候號稱“永不被殺的木馬”，呵呵，時至今日，隨便什么殺毒軟件都能將其殺得片甲不留^_^呵呵，受到木馬換殼躲避殺毒軟件思路影響，我們也可以給asp木馬“

用戶在訪問站點時經(jīng)常遇到一些煩人的信息，比如他們經(jīng)常不知何故地在沒有實際提交數(shù)據(jù)給表單時就到了下一個頁面，或者經(jīng)常達到一個頁面，它是以查詢字符串的形式轉(zhuǎn)來的，比如?ID=236454。

如果頁面沒有得到信息，就會產(chǎn)生一個大錯誤。這經(jīng)常發(fā)生在頁面尋找ID或者其他一些信息時，而這時用戶是使用書簽或者搜索引擎連接到這個頁面的。所以，頁面需要的信息丟失了，頁面結(jié)束。

你可以通過檢查來了解是否有數(shù)據(jù)被提交，從而控制這種情況的發(fā)生，然后，根據(jù)情況顯示特定的錯誤信息，或者執(zhí)行其他的動作，比如重定向到想要的頁面。

在下面的3個例子中，僅僅在屏幕上顯示一個信息。

將這段代碼直接放置在<% @ LANGUAGE="VBSCRIPT" %>下面。

對于一個表單，使用POST方法

以下為引用的內(nèi)容： < % If Request.Form = "" Then Response.Write("< p align=""center"" >< font face=""Arial"" >There Was An Error.< br >" & vbCrLf) Response.Write("No Data Was Posted.< /font > " & vbCrLf) Response.End End If % >

對于一個表單，使用PUT和GET方法。這同樣適用于從帶有查詢字符串連接而來的頁面，比如?ID=236454

以下為引用的內(nèi)容： < % If Request.Querystring = "" Then Response.Write("< p align=""center"" >< font face=""Arial"" >There Was An Error.< br >" & vbCrLf) Response.Write("No Data Was Posted.< /font > " & vbCrLf) Response.End End If % >

為了含概上面例子中的情況，要做下面的工作。盡管還有簡單的方法，但是這個例子對于初學者，將是很好的學習基本原理的方法。

以下為引用的內(nèi)容： < % IsData = 0 If Request.Form < > "" Then IsData = IsData 1 If Request.Querystring < > "" Then IsData = IsData 1 If IsData = 0 Then Response.Write("< p align=""center"" >< font face=""Arial"" >There Was An Error.< br >" & vbCrLf) Response.Write("No Data Was Posted.< /font > " & vbCrLf) Response.End End If % >

或者

以下為引用的內(nèi)容： < % IsData = "No" If Request.Form < > "" Then IsData = "Yes" If Request.Querystring < > "" Then IsData = "Yes" If IsData = "No" Then Response.Write("< p align=""center"" >< font face=""Arial"" >There Was An Error.< br >" & vbCrLf) Response.Write("No Data Was Posted.< /font > " & vbCrLf) Response.End End If %>

分享：用ASP封IP的方法，防止固定IP垃圾留言
以下為引用的內(nèi)容： <% Dim IP,IPString,VisitIP '要禁止的IP地址 IPString="|195.225.177.34|195.225.177.137|72.232.250.10|&qu