ip地址的分段计算

在VBS没有运行,所以在页面中使用JS和VBS,是不好的,如果vbs也可以,但有些罗嗦一点需要注意的是,如果在VBS的分裂(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)

%>