您现在的位置: 军旅同心 >> 读书赏析 >> 学习园地 >> 电脑网络 >> 技术文章 >> 文章正文
域名查询代码公布
作者:采集员 文章来源:来源于网络 点击数: 更新时间:2005-9-10 14:36:28
域名查询代码公布  
    <?php  
// 网络技术主管座右铭:三人行,其必有我师焉。http://www.ctohome.com  
// 这个代码可以是说是非常的SMART,我改动了小小部分使它更容易用。  

$moreinfolist = array( // 储存WHOIS查询主机的连接方法  
'at' => 'www.ripe.net/cgi-bin/whois?query=',  
'au' => 'www.aunic.net/cgi-bin/whois.aunic?',  
'bm' => 'www.bermudanic.bm/cgi-bin/BermudaNIC/rwhois_query_get.pl?query_text=',  
'ch' => 'www.switch.ch/cgi-bin/domain/search_domain?keyword=',  
'com'=> 'www.networksolutions.com/cgi-bin/whois/whois/?STRING=',  
'cz' => 'www.ripe.net/cgi-bin/whois?query=',  
'de' => 'www.ripe.net/cgi-bin/whois?query=',  
'dk' => 'www.ripe.net/cgi-bin/whois?query=',  
'edu'=> 'www.networksolutions.com/cgi-bin/whois/whois/?STRING=',  
'es' => 'www.nic.es/whois/index.php?type=Dominios&key=',  
'fi' => 'www.ripe.net/cgi-bin/whois?query=',  
'fo' => 'www.ripe.net/cgi-bin/whois?query=',  
'fr' => 'harmonic.nic.fr/cgi-bin/HarmoNIC.pl?Annu_Suffixe=&Annu_Action=Rechercher&Annu_Automaton_State=17&Annu_Motif=',  
'gl' => 'www.ripe.net/cgi-bin/whois?query=',  
'gm' => 'www.ripe.net/cgi-bin/whois?query=',  
'gov'=> 'www.nic.gov/cgi-bin/whois?s=nic.gov',  
'gr' => 'www.ripe.net/cgi-bin/whois?query=',  
'hu' => 'www.ripe.net/cgi-bin/whois?query=',  
'id' => 'whois.idnic.net.id/cgi-bin/whois-cgi?user=',  
'ie' => 'www.ripe.net/cgi-bin/whois?query=',  
'il' => 'www.ripe.net/cgi-bin/whois?query=',  
'is' => 'www.ripe.net/cgi-bin/whois?query=',  
'it' => 'www.ripe.net/cgi-bin/whois?query=',  
'jp' => 'www.nic.ad.jp/cgi-bin/whois_gw?lang=/e&type=DOM&rule=ex&key=',  
'lb' => 'www.aub.edu.lb/cgi-bin/lbdr.pl?cn=',  
'li' => 'www.switch.ch/cgi-bin/domain/search_domain?keyword=',  
'lt' => 'www.ripe.net/cgi-bin/whois?query=',  
'lv' => 'www.ripe.net/cgi-bin/whois?query=',  
'mc' => 'www.ripe.net/cgi-bin/whois?query=',  
'mil'=> 'www.nic.mil/cgi-bin/whois?stype=Domains&ctype=reg&keyword=',  
'ms' => 'www.adamsnames.tc/whois/?seen=y&domain=',  
'mx' => 'www.nic.mx/cgi/whois?',  
'net'=> 'www.networksolutions.com/cgi-bin/whois/whois/?STRING=',  
'no' => 'www.ripe.net/cgi-bin/whois?query=',  
'nz' => 'www.domainz.net.nz/facility/namesearch/Result.asp?prmMode=Search&DomainName=',  
'org'=> 'www.networksolutions.com/cgi-bin/whois/whois/?STRING=',  
'pt' => 'www.ripe.net/cgi-bin/whois?query=',  
'ro' => 'whois.rotld.ro/cgi-bin/whois?whois=',  
'sk' => 'www.ripe.net/cgi-bin/whois?query=',  
'sm' => 'www.ripe.net/cgi-bin/whois?query=',  
'tc' => 'www.adamsnames.tc/whois/?seen=y&domain=',  
'tf' => 'www.adamsnames.tc/whois/?seen=y&domain=',  
'th' => 'www.thnic.net/cgi-bin/whois.pl?server=whois.thnic.net&string=',  
'tj' => 'www.nic.tj/whois.cgi?domain',  
'tr' => 'whois.cc.metu.edu.tr/whois/wwwwhois?Whois=',  
'uk' => 'www.nic.uk/cgi-bin/whois.cgi?query=',  
'va' => 'www.ripe.net/cgi-bin/whois?query=',  
'vg' => 'www.adamsnames.tc/whois/?seen=y&domain='  
);  

# where can we get more info?  
$moreinfo = FALSE;  
for ( reset($moreinfolist) ; list($tail, $moreinfoname) = each($moreinfolist) ; )  
if ( eregi("\.$tail$", $address) ) { // 比较域名后缀  
$moreinfo = $moreinfoname; // 遇到匹配项就立即结束循环  
break;  
}  

if ( $moreinfo && $address) { // 跳转到WHOIS主机  
header('Location: http://'. $moreinfo . $address);  
exit();  
}  
else {  
echo "<form action=$PHP_SELF method=post>  
请输入域名:<input name=address>  
<input type=submit></form>";  
}  

?>  

<html>  

<head>  
<title>whois tool</title>  
</head>  

<body>  

<p>网络技术主管汉化解释</a>.</p>  

<hr />  
<address>http://www.ctohome.com</address>  

</body>  

</html>  

<?php  
highlight_file("whois.php");  
?>  



 
免责声明:作品版权归所属媒体与作者所有!!本站刊载此文不代表同意其说法或描述,仅为提供更多信息。如果您认为我们侵犯了您的版权,请告知!本站立即删除。有异议请联系我们。
文章录入:烟灰缸    责任编辑:烟灰缸 
网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
| 设为首页 | 加入收藏 | 联系站长 | 友情链接 | 版权申明 | 网站公告 | 管理登录 |