php写的域名查询系统whois

<?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>