最近經常見到有人問如何在asp中查詢域名是否被注冊，所以寫了這個組件，主要原理就是向gopher站點的whois服務器發送whois請求，由于沒有太多時間，所以很簡陋，目前只能實現向cnnic查詢，并且返回的信息沒有進行處理，如果你要用的話，清在asp里自己處理一下吧。以后如果有時間將加上過及域名的查詢功能。其實最主要的目的還是給大家做組件提供一點參考，畢竟組件的寫法有些特殊。

下載地址：
組件：http://homepage.qdcatv.com.cn/bigeagle/whois.zip
源代碼：http://homepage.qdcatv.com.cn/bigeagle/whoiscode.zip

組件介紹
域名查詢組件0.01版

組件名稱：WhoIS

描述： 查詢域名是否已注冊，如果注冊，則顯示該域名的信息，包括注冊者的詳細信息。

版本：0.01 （之所以稱為0.01版是因為是在是太簡陋了，目前只能查詢國內注冊的站點，也就是以cn結尾的站點。另外輸出未做處理，需要在外部進行再包裝。實在沒有時間。）

日期：2000/9/15日

作者：bigeagle


使用方法（以asp調用為例）

<%
dim m_objDomainInfo

'創建whois對象
set m_objDomainInfo = server.CreateObject ("WhoIs.DomainInfo")

'查詢新浪，你可以改變，但不能加前面的www
m_objDomainInfo.GetDomainInfoCn ("cctv.com.CN")


if m_objDomainInfo.IfSuccess <> 0 then '如果成功
Response.Write replace( m_objDomainInfo.DomainInfo , vbcrlf , "<br>")
else '如果失敗
Response.Write "失敗原因：" & m_objDomainInfo.DomainInfo
end if
set m_objDomain = nothing
%>
（出處：熱點網絡）