ASP获取IP所属地区名称

最新推荐文章于 2018-06-12 14:11:18 发布

转载最新推荐文章于 2018-06-12 14:11:18 发布 · 172 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/qiuyi21/articles/1089569.html

文章标签：

#javascript #数据库 #ViewUI

本文提供了一个简单的ASP函数，用于通过IP地址获取其对应的地理位置信息。利用纯真IP数据库，该函数能够验证IP地址的有效性并返回相应的地区名称。

花了点时间写了个页面，可以获取IP地址所属的地区名称，借用纯真IP数据库~~~ ^_^

程序代码如下，比较简单，一个函数而已。使用请把代码复制到记事本，然后另存为ASP文件（扩展名为.asp）。

<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<%
function getAreaName(ipAddr) {
if (!ipAddr) {
  return "无效参数";
} else if (/^((2[0-4]"d|25[0-5]|[01]?"d"d?)".){3}(2[0-4]"d|25[0-5]|[01]?"d"d?)$/.test(ipAddr) == false) {
  return "无效的IP地址";
}

var http = null;
try {
  http = Server.CreateObject("Microsoft.XMLHTTP");
} catch(e) {
  try {
   http = Server.CreateObject("Msxml2.XMLHTTP");
  } catch(e) {
   return "服务器不支持XML对象";
  }
}
http.Open("GET", "http://www.cz88.net/ip/default.aspx?ip=" + ipAddr, false);
http.Send();
if (http.readyState == 4) {
  var area = "无法获取";
  var res = http.ResponseText;

  var startPos = res.indexOf("InputIPAddrMessage");
  if (startPos == -1) { return area; }
  startPos = res.indexOf(">", startPos);
  if (startPos == -1) { return area; }

  var endPos = res.indexOf("<", startPos);
  if (endPos == -1) { return area; }
  area = res.substring(startPos + 1, endPos);

  return area;
} else {
  return "读取失败";
}
}