有誰知道中国的IP地址范围,在线等待
============================
@* .☆ / */ . / * . ☆/ *。
◢◣。 ◢◣。
◢★◣。 ◢★◣。
◢■■◣。 ◢■■◣。
◢■■■◣。 ◢■■■◣。
︸︸||︸︸ !!︸︸||︸︸
愿您有快乐的每一天 ^_^!!
============================
@* .☆ / */ . / * . ☆/ *。
◢◣。 ◢◣。
◢★◣。 ◢★◣。
◢■■◣。 ◢■■◣。
◢■■■◣。 ◢■■■◣。
︸︸||︸︸ !!︸︸||︸︸
愿您有快乐的每一天 ^_^!!
解决方案 »
- 100求解:托了一个浏览器控件放对话框里IHTMLWindow2 execScript没有效果
- 求 ATL 开发指南(中文第二版) 电子版
- 在dll中用AFX_EXT_CLASS输出类的部分成员(但不输出整个类),那在调用程序 怎么声明调这些成员呢?
- 请教ado中的PutCollect()函数报错问题
- 怎样改变AppWizard生成的窗口的大小
- (SDK) 如何实现透明控件?以及如何在控件中显示光标的问题
- 有没有可以设置代理服务器功能的通讯程序的例子
- 如何调用MSChart控件中的create函数
- GDI+高手指点:那么有什么办法构建一个内存流呢?再看以下代码:为何同样一个流,SAVE成功,而LOAD却失败了呢?
- 求救,正在用mfc编写打印数据库报表的通用activex控件,寻求各位大侠帮助给出思路或相关资源,书籍
- 求救(关于oracle存储过程中调用另一存储过程问题,请高手回答 因本人注册不久只能给20分,望见谅)
- 请问,VS.net(英文版)的能不能装在win2000 中文版上?
dim sip,str1,str2,str3,str4,num_1,num_2
if request("action") = "save" then
sip=cstr(request("ip1"))
'dot=instr(ip,".")-1
'response.write dot
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+cint(str4)-1 sip=cstr(request("ip2"))
str1=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str2=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str3=left(sip,instr(sip,".")-1)
str4=mid(sip,instr(sip,".")+1)
num_2=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1
'response.write num_1 &","& num_2
'response.end
set rs = server.CreateObject ("adodb.recordset")
sql="select Top 1 country,city,ip1,ip2 from address where (ip1 <="&num_1&" and ip2 >="&num_1&") or (ip1 <="&num_2&" and ip2 >="&num_2&")"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
rs.addnew
rs("ip1")=num_1
rs("ip2")=num_2
rs("country")=trim(request("country"))
if request("city")<>"" then
rs("city")=trim(request("city"))
E-Mail:
[email protected]
如果能用马上给分
觉的还挺多的。
[email protected]
呢?
谢谢
谢谢你呀