ASP TCPIP.DNS组建根据域名获取IP地址

看到很多站长工具网，都提供了通过域名获取网站IP的方法。自己也想做一个，网上查了不少代码。有说用WSHSHELL，也有说用ASPPING组件。
我在用WSHSHELL组件的时候，老是提示拒绝访问，网上搜索解决方案，说是权限问题，但是又没有具体的权限设置方案。
用ASPPING组件，返回的PING值为空。
于是上国外网站搜索其他的asp组件，终于找到可用而且免费的ASP组件：TCPIP.DNS组件，代码也非常简单，而且获取域名对应的IP速度也挺快。
代码为：
<%
Set DNS = CreateObject("TCPIP.DNS")
ip = DNS.GetIPByHost(“www.aspxhome.com”)
response.write IP
%>