首頁猿問請問下這段代碼怎么用.放哪用.請具...

請問下這段代碼怎么用.放哪用.請具體講下.謝謝

JavaScript

www說 2022-09-15 22:18:27

RT.function LockIP(sip)dim str1,str2,str3,str4dim numLockIP=falseif isnumeric(left(sip,2)) thenstr1=left(sip,instr(sip,".")-1)sip=mid(sip,instr(sip,".")+1)str2=left(sip,instr(sip,".")-1)sip=mid(sip,instr(sip,".")+1)str3=left(sip,instr(sip,".")-1)str4=mid(sip,instr(sip,".")+1)if isNumeric(str1)=0 or isNumeric(str2)=0 or isNumeric(str3)=0 or isNumeric(str4)=0 thenelsenum=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1sql="select count(*) from LockIP where ip1 <="&num&" and ip2 >="&num&""set rs=conn.execute(sql)if rs(0)>0 thenLockIP=trueend ifset rs=nothingend ifend ifend function還有就是,我現在已經有一張全國的IP對應的地址這樣的表.字段為開始IP.結束IP.對應城市名.那里IP全是十進制的像798588928這樣的數字,有人說用cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1這個表達式可以把IP轉化為十進制嗎?請明白的講下.謝謝!問題補充：這個function代碼是放在前臺頁面嗎?,還是放在哪?如果放在前臺頁臺,我后臺怎么調用呢?它的返回值應該是個長整型吧,還是什么?這段代碼放哪里.怎么調用.謝謝.!!

查看完整描述

3 回答

長風秋雁

TA貢獻1757條經驗獲得超7個贊

你這個是ASP中的vbscript腳本吧，這個function是放在服務器上執行的，在某個.asp頁面中。

這個IP轉換的函數用的很多，他的功能就是把IP地址轉換成十進制的數值，用來方便數據庫查詢的。

因為如果IP是字符型，那是不好查詢的，所以就做了個轉換，這樣你就可以用這種方式查詢了：

select count(*) from LockIP where ip1 <="&num&" and ip2 >="&num&"

但這個函數并不是直接用來查詢IP對應城市的，它應該是用來查找某個IP是否在被鎖定的IP段范圍內的，不過你可以稍加修改，它就可以用來查找城市了，因為這個IP表里應該有城市字段的，

這樣改：

sql = "select city from [你的IP表] where ip1 <=" & num & " and ip2 >=" & num

dim city=""
set rs=conn.execute(sql)
if rs <> null and rs.count > 0 then
city = rs(0)
end if

其中的city對應你表中的城市字段

反對回復 2022-09-21

慕虎7371278

TA貢獻1802條經驗獲得超4個贊

System.Net.IPAddress.Parse(context.Request.UserHostAddress)
可以把IP轉換成數字形式
===================================
網上存在的IP數據庫，如QQ純真數據庫的格式大致如下
ip1,ip2,地址
ip11,ip22,地址
ip111,ip222,地址
ip1111,ip222,地址
……
=====================
你把ip1轉換為數字存入數據庫字段1，把IP2轉換為數字存入IP2，把地址存入字段3
======================
查詢的時候，你把IP轉換為數字ipnum。
select 地址 from 表 where ipnum>=字段1 and ipnum<=字段2
=======================
也可以把ip當字符串，不足三位的補0，查詢的時候類似，不過應該速度沒上面那個

反對回復 2022-09-21

猛跑小豬

TA貢獻1858條經驗獲得超8個贊

加個：using System.Text.RegularExpressions;

public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
Response.Write(IPAddress);
}

#region 取得客戶端真實IP。如果有代理則取第一個非內網地址
/// <summary>
/// 取得客戶端真實IP。如果有代理則取第一個非內網地址
/// </summary>
public static string IPAddress
{
get
{
string result = string.Empty;

result = HttpContext.Current.Request.ServerVariables["HTTP_X_FORWARDED_FOR"];
if (!string.IsNullOrEmpty(result))
{
//可能有代理
if (result.IndexOf(".") == -1) //沒有“.”肯定是非IPv4格式
result = null;
else
{
if (result.IndexOf(",") != -1)
{
//有“,”，估計多個代理。取第一個不是內網的IP。
result = result.Replace(" ", "").Replace("'", "");
string[] temparyip = result.Split(",;".ToCharArray());
for (int i = 0; i < temparyip.Length; i++)
{
if (IsIPAddress(temparyip[i])
&& temparyip[i].Substring(0, 3) != "10."
&& temparyip[i].Substring(0, 7) != "192.168"
&& temparyip[i].Substring(0, 7) != "172.16.")
{
return temparyip[i]; //找到不是內網的地址
}
}
}
else if (IsIPAddress(result)) //代理即是IP格式
return result;
else
result = null; //代理中的內容非IP，取IP
}

}
string IpAddress = (!string.IsNullOrEmpty(HttpContext.Current.Request.ServerVariables["HTTP_X_FORWARDED_FOR"])) ? HttpContext.Current.Request.ServerVariables["HTTP_X_FORWARDED_FOR"] : HttpContext.Current.Request.ServerVariables["REMOTE_ADDR"];

if (null == result || result == String.Empty)
result = HttpContext.Current.Request.ServerVariables["REMOTE_ADDR"];

if (result == null || result == String.Empty)
result = HttpContext.Current.Request.UserHostAddress;

return result;
}
}
#endregion

#region 判斷是否是IP格式
/// <summary>
/// 判斷是否是IP地址格式 0.0.0.0
/// </summary>
/// <param name="str">待判斷的IP地址</param>
/// <returns>true or false</returns>
public static bool IsIPAddress(string str)
{
if (str == null || str == string.Empty || str.Length < 7 || str.Length > 15) return false;

string regformat = @"^\d{1,3}[\.]\d{1,3}[\.]\d{1,3}[\.]\d{1,3}$";

Regex regex = new Regex(regformat, RegexOptions.IgnoreCase);
return regex.IsMatch(str);
}
#endregion
}

反對回復 2022-09-21

3 回答
0 關注
131 瀏覽

關注

添加回答

舉報

0/150

提交

取消

亚洲在线久爱草,狠狠天天香蕉网,天天搞日日干久草,伊人亚洲日本欧美

熱搜

最近搜索清空

請問下這段代碼怎么用.放哪用.請具體講下.謝謝

請問下這段代碼怎么用.放哪用.請具體講下.謝謝

3 回答

添加回答