如何用asp判断ip地址是否是广东或香港的

来源:百度知道 编辑:UC知道 时间:2024/05/07 16:38:15
已下载QQwry.dat并升级到最新,已转成access,下载地址是http://lijinling.w145.5kweb.cn/ip.rar
不知道怎么写查询
多谢高手帮忙
多谢rate0302
我是要放在网站里用,判断这两个地区的访问量

<%
'文件名:ip.asp 与QQwry.dat放在一个文件夹下面
'使用:在要用到的查询ip的asp页面中最前面加入<!--#include file = "ip.asp"-->
'然后可以用address(getIP())获得请求的地理位置

'=========================================================
' IP物理定位搜索类 Version 3.0.0
' QQWry.DAT 利用程序 修改自互联网流传代码
' 本类在ASP环境中使用纯真版QQWry.dat通过完美测试
' 如果您的服务器环境不支持ADodb.Stream,将无法使用此程序
' 推荐使用纯真数据库,更新也方便
' ========================================================

' ============================================
' 返回IP信息
' 如address("127.0.0.1")
' 返回值为:"本机地址 CZ88.NET"
' ============================================
Function address(sip)
Dim Wry, IPType
Set Wry = New TQQWry
IPType = Wry.QQWry(sip)

address=""&Wry.Country & " " & Wry.LocalStr &""
End Function

'获得请求的实际IP地址
Function getIP()
Dim