ASP利用TCPIP.DNS组件获得域名对应的IP

看到很多站长工具网，都提供了通过域名获取网站IP的方法。自己也想做一个，网上查了不少代码。有说用WSHSHELL，也有说用ASPPING组件。

我在用WSHSHELL组件的时候，老是提示拒绝访问，网上搜索解决方案，说是权限问题，但是又没有具体的权限设置方案。

用ASPPING组件，返回的PING值为空。

于是上国外网站搜索其他的asp组件，终于找到可用而且免费的ASP组件，代码也非常简单，而且获取域名对应的IP速度也挺快。

代码为：

<％
Set DNS = CreateObject("TCPIP.DNS")
ip = DNS.GetIPByHost(www.aspxhome.com)
response.write IP
％>

组件和代码下载地址为：

远程下载：tcpipdns.rar （184.14 KB）

本地下载：tcpipdns.rar （184.14 KB）