关于IP分址计算问题

[hcqhappy]

想把客户端机录的IP到目标（条件ip段中去对应）
得出ip的真实地理位置
应用动网论坛数据库中dns格式
ip1:3526086655 ip2:3526090750 地址：湘潭师范学院
ip范围即是 3526086655--3526090750
但怎么算的呢？
后看了其程序：
if request("reaction")="yes" then
dim sip,str1,str2,str3,str4,num_1,num_2
sip=cstr(request.form("ip1"))
str1=left(sip,cint(instr(sip,".")-1))
sip=mid(sip,cint(instr(sip,"."))+1)
str2=left(sip,cint(instr(sip,"."))-1)
sip=mid(sip,cint(instr(sip,"."))+1)
str3=left(sip,cint(instr(sip,"."))-1)
str4=mid(sip,cint(instr(sip,"."))+1)
num_1=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+c
ion.steven 说：
set rs = server.CreateObject ("adodb.recordset")
sql="select * from LockIP"
rs.open sql,conn,1,3
rs.addnew
rs("ip1")=num_1
rs("ip2")=num_2
rs("sip1")=request.form("ip1")
rs("sip2")=request.form("ip2")
rs.update
rs.close
set rs=nothing
sucmsg="<li>您选择IP已经被禁止访问论坛。"
call dvbbs_suc()
ion.steven 说：
else
dim userip,ips,GetIp1,GetIp2
if request("ip")<>"" then
userip=request("ip")
ips=Split(userIP,".")
GetIp1=ips &"."&ips(1)&"."&ips(2)&".1"
GetIp2=ips &"."&ips(1)&"."&ips(2)&".255"
else
userip=""
GetIp1=""
GetIp2=""
end if

其中num_1=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+c
是关键请告知着程序究竟怎样分析ip的？

[julyclyde]

按.号，分出4个数字
然后按上面的规则算嘛

这是标准算法

[hcqhappy]

不好意思 我是新手 还是不太懂 能不能说仔细点 谢谢了

[julyclyde]

不需要懂。知道就是这样算的就可以了