top
Loading...
一個用vc開發的域名查詢組件(源代碼及說明)
最近經常見到有人問如何在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
%>

北斗有巢氏 有巢氏北斗