ASP常用函数:CLngIP()
发布时间：2016-12-29 来源：查字典编辑
摘要：作用:把IP地址转为长整型
作用:把IP地址转为长整型
<%
FunctionCLngIP(ByValasNewIP)
DimlnResults
DimlnIndex
DimlnIpAry
lnIpAry=Split(asNewIP,".",4)
ForlnIndex=0To3
IfNotlnIndex=3Then
lnIpAry(lnIndex)=lnIpAry(lnIndex)*(256^(3-lnIndex))
EndIf
lnResults=lnResults+lnIpAry(lnIndex)
Next
CLngIP=lnResults
EndFunction
%>