php写的域名查询系统whois

作者:未知 来源:未知 添加时间:2006年7月2日 字体:



<?PHP 

if ($domain) 



if ($domain) 





$fp = fsockopen( "rs.internic.net", 43, &$errno, &$errstr, 10); 

if (!$fp) 



echo "$errstr ($errno) 

n"; 



else 



fputs($fp, "$domainrn"); 

while(!feof($fp)) 



$buf = fgets($fp,128); 

if (ereg( "Whois Server:", $buf)) 



$server = str_replace( "Whois Server: ", "", $buf); 

$server = trim($server); 





fclose($fp); 



if ($server) 



echo "<B>$domain is registered at $server:</B><BR>"; 

echo "<PRE>"; 

$fp = fsockopen($server, 43, &$errno, &$errstr, 10); 

if(!$fp) 



echo "Could not open connection to $server on port 43.n"; 

echo "$errstr ($errno) 

n"; 



else 



fputs($fp, "$domainrn"); 

while(!feof($fp)) 



echo fgets($fp,128); 



fclose($fp); 





else { 

echo( "<b>$domain does not appear to be registered.</b><BR>"); 



echo ( "</PRE><BR>"); 







?> 

<FORM ACTION=" <?PHP echo($PHP_SELF); ?>" METHOD="post"> 

查找 .com, .org, and .net 主机 



主机名: <INPUT TYPE="text" NAME="domain" SIZE="40" MAXLENGTH="100"> 

<INPUT TYPE=submit &#118alue="Find out"><INPUT TYPE=reset &#118alue="Reset"> 

</FORM>

ppdesk