ip地址的分段计算

函数的IPDeCode（EIP）{
VaR IP1，IP2，IP3 IP4；
IP1 = movebyter（EIP 0xff000000,3）；
IP2 = movebyter（EIP 0x00ff0000,2）；
IP3 = movebyter（EIP 0x0000ff00,1）；
IP4 = EIP 0x000000ff；
返回IP1 ++ IP2 + ，+ + IP3 IP4。+；
}


功能movebytel（num，bytenum）{
返回num（bytenum×8）<< =
}

功能movebyter（num，bytenum）{
返回num（bytenum×8）> > > =
}




在VBS没有运行，所以在页面中使用JS和VBS，是不好的，如果vbs也可以，但有些罗嗦一点需要注意的是，如果在VBS的分裂（202.102.29.6 ，），你会得到202102, 29个数字三，也不到一个6年底，所以有必要更换IP分（202.102.29.6 ，，）
我很欢乐，因为我没有一点的工作，我做了很多麻烦。
<
功能ip2int（ipstr）
昏暗的iptemp，马克斯
iptemp =分裂（ipstr 。
马克斯= UBound（iptemp）
如果马克斯＜4，那么
退出功能
最后如果

昏暗的A，B，我
ah
对于我= 0比3
B =进制（iptemp（我））
如果莱恩（b）＝1
b0b
最后如果
= AB
下一个
ip2int = CLNG（一）
端功能

功能int2ip（IP）
昏暗的iptemp，一，ipstr，我长
iptemp =进制（IP）
长度= 8 -莱恩（iptemp）
对于i = 1到长度
iptemp =0iptemp
下一个
=左（iptemp，2）
aha
我= Cint（一）
a CSTR（一）
ipstr = 。
a中（iptemp，3,2）
aha
我= Cint（一）
a CSTR（一）
ipstr = ipstr 。
a中（iptemp，5,2）
aha
我= Cint（一）
a CSTR（一）
ipstr = ipstr 。
a右（iptemp，2）
aha
我= Cint（一）
a CSTR（一）
ipstr = ipstr一
int2ip = ipstr
端功能

昏暗的testip，testint
testip =202.102.29.6
testint = ip2int（testip）
response.write testip将编码为testint
response.write testip 将被编码为int2ip（testint）
%>