ASP组件介绍—w3Sockets
2010-8-10编辑:feimeimei
这里主要介绍如何用该组件WHOIS域名,目前网上很多域名查询系统都是通过XMLHTTP获得其他网页数据,而获得记录。其实,我们完全可以通过w3Sockets自己来实现WHOIS的功能。
程序代码
Code: [Copy to clipboard]
% @ LANGUAGE=VBScript %
%
Dim Domain,socket
Domain = 91now‘这里以91now为例
Set socket = Server.CreateObject ‘建立socket对象
function whois
socket.Host = Server + :43 ‘设置主机地址
socket.Open’打开
socket.SendLine‘传递变量
socket.WaitForDisconnect
Response.Write’获得内容
socket.Close ‘关闭
End Function
%
html
body bgcolor=#FFFFFF text=#000010 link=#0000C0 vlink=#000040 alink=#000040
%Call whois %
%Call whois %
%Call whois %
/body
/html