-
asp 源 ** 如下所示。
ip="remote_addr")
iscnip=false
ipnum=ip2num(ip)
set fso="")
set adminipfile=""),1,true)if not then adminip=set adminipfile=nothingset file=""))
do while not
ipline=
minandmax=split(ipline,"-")minip=ip2num(minandmax(0))maxip=ip2num(minandmax(1))if ipnum>=minip and ipnum<=maxip then
iscnip=true
exit do
end if
loopset file=nothing
set fso=nothing
if ip=adminip then iscnip=falseif iscnip then
禁止訪問"end if
function ip2num(strip)strarray=split(strip,".")for i=0 to 3
strarray(i)=int(strarray(i))next resultnum=""
for i=0 to 3
next ip2num=resultnumend function
生效內容:
ip="remote_addr")
set fso="")
set file=""),2)
ipset file=nothing
set fso=nothing
把它放在同乙個目錄下,把檔名改得更複雜一點,儲存在書籤中,登入後就可以訪問這個檔案了。
-
Internet 上有乙個全域性 IP 分配表,全域性 IP 分配表用作庫。 然後,當客戶端訪問時,它會獲取客戶端的 IP 位址並在資料庫中查詢它。 如果找到,則返回特定的錯誤頁。
-
100積分買乙個商業應用,很值得。
-
在根目錄下建立主頁。
此網頁用於確定 IP 位址屬於哪個號碼段,然後重定向。
ASP的縮寫如下。
userip 獲取使用者的 IP 位址
userip="remote_addr"如果(確定使用者IP條件的數字段),那麼您將跳轉到是否滿足。
否則符合要求並跳轉到。
end if
-
確定接入客戶的IP位址,如果是國內IP,禁止訪問,這可行嗎?
-
您可以設定IP位址的訪問範圍。
-
真實IP的獲取應該是這樣的:
ip = "http_x_forwarded_for")
if ip = then
ip="remote_addr")
end if
if instr(ip,"'0 then
ip=""end if
這樣,就可以突破IP檢視真實IP。 而不是簡單地使用 ip=
remote_addr")。這樣一來,如果人們使用**,就只能拿到服務遊戲喊叫者的IP。
我們知道 IP 格式如下所示:
每個位是 0 到 255。 因此,我們可以將任何 IP 轉換為多個 ipnum
ASP公式:
ip=""arr=split(ip,".
ipnums=int(arr(0))*16777216+int(arr(1))*65536+int(arr(2))*256+int(arr(3))-1
ipnums
以這種方式獲得的結果是唯一的,飢餓的大小和IP的大小之間的關係是相同的。
比較 IP 時,請直接比較 IPNUM 的大小,以確定它是否在您需要的 IP 段內。
例如,學校的第乙個 IP 段是這樣的:
郵 位: 2886729728 - 2886926333
現有私有 IP 位址:轉換後2886820963
你可以知道2886729728<2886820963<2886926333
因此,您可以知道該 IP 在內網中,因此您可以跳轉到它。
ip = "http_x_forwarded_for"爛)這句話,如果你用**IP上網,這個就會通過**得到真正的IP。但是,如果不使用 **,則會得到乙個 null 值。 因此,下面就是判斷所獲得的IP是否被使用**:
if ip = then ip="remote_addr"如果未使用,則結束,則 ip="http_x_forwarded_for"如果該值為空,則使用 ip="remote_addr") 來獲取真正的 IP。
讓我們更多地談談第一部分。 ip = "http_x_forwarded_for") if ip = then ip="remote_addr") end if if instr(ip,"'0 then ip="" end if
如果 IP 包含符號',則 IP 為 if instr(IP,"'0 then ip=""end if 這種方法主要是確定規範的 IP,使 split(ip,".在任何情況下你都不會出錯。
-
我給你發了一封電子郵件。
記得給我打分。 我累了。
-
我被 Safe Dog 黑名單遮蔽了。 我不知道你想用什麼樣的方式來阻止國內IP,無論是防火牆阻止還是**程式阻止。
Times Connect 將通過複製 Google 翻譯的翻譯結果來回答您的問題。
-
<%str0 = "remote_addr")str1=left(str0,9)
if (str1>="**.
and str1<="**.
or str1="**.
or str1="**.
or (str0>="**.
" and str0<="**.
*") or (str0>="**.
" and str0<="**.
*") or str0="**.
" then
<%else
"")"非單位使用者,禁止訪問! ")
end if
以上是允許的,以下段落是限制的 <%
dim badip
badip="remote_host")
if badip="**.
or badip="***
" or badip="***
*" then
end if
-
我會向你展示這個功能,就用它吧。
function getip()
dim dulip,proip
dulip="http_x_forwarded_for")proip="remote_addr")
if dulip="" then
getip=proip
elsegetip=dulip
end if
end function