ASP转化ip地址为长整型数字

欢迎您访问我爱IT技术网，今天小编为你分享的编程技术是：【ASP转化ip地址为长整型数字】，下面是详细的分享！

ASP转化ip地址为长整型数字

有时候我们会在页面上显示用户的所在地区，这个原理是：先得到用户的IP，然后去查询将IP转换成一个数值，最后去查这个数值所在的范围，来得到用户所在的地方。
IP转换成数值的方法：
假设IP是192.168.0.1
192*255*255*255+168*255*255+0*255+1
结果就是要得到的数值。

将ip地址转换为长整型

<% 
Function CLngIP(ByVal asNewIP) 
Dim lnResults 
Dim lnIndex 
Dim lnIpAry 
lnIpAry = Split(asNewIP, ".", 4) 
For lnIndex = 0 To 3 
If Not lnIndex = 3 Then 
lnIpAry(lnIndex) = lnIpAry(lnIndex) * (256 ^ (3 - lnIndex)) 
End If 
lnResults = lnResults + lnIpAry(lnIndex) 
Next 
CLngIP = lnResults 
End Function 
%>


逆函数

<% 
Function CStrIP(ByVal anNewIP) 
Dim lsResults 
Dim lnTemp 
Dim lnIndex 
For lnIndex = 3 To 0 Step -1 
lnTemp = Int(anNewIP / (256 ^ lnIndex)) 
lsResults = lsResults & lnTemp & "." 
anNewIP = anNewIP - (lnTemp * (256 ^ lnIndex)) 
Next 
lsResults = Left(lsResults, Len(lsResults) - 1) 
CStrIP = lsResults 
End Function 
%>

以上所分享的是关于ASP转化ip地址为长整型数字，下面是编辑为你推荐的有价值的用户互动：

　　相关问题：计算机应用无符号长整型数来存储和表示ip地址 而且...

　　答：你的问题含义不清，所谓两种格式指什么？ IP地址（常见ip v4）常见方便人读写的表达方式类似为：192.168.1.135，即小数点分隔的4段数字；实际在计算机机器处理，也常常转成一个32位的无符号长整形；注意，前后的转换关系——小数点分隔的4段数字，... >>详细

　　相关问题：C语言中字符型数字和整型数字之间有什么关系？怎么...

　　答：整型数据就是不包含小数部分，只表示整数。字符型数据只是一些字符串，可以是中文字符、英文字符、数字、ASCⅡ字符等。两者没什么关系。 >>详细

　　相关问题：在asp如何将数字转为长整型

　　答：强制转化 >>详细