PHP寫的域名查詢系統Whois
來源：程序員人生 發布時間：2013-10-30 18:53:29 閱讀次數：3681次
- <?PHP
- if ($domain)
- {
- if ($domain)
- {
-
- $fp = fsockopen( "rs.internic.net", 43, &$errno, &$errstr, 10);
- if (!$fp)
- {
- echo "$errstr ($errno)<br>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)<br>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 主機<br>
- 主機名: <INPUT TYPE="text" NAME="domain" SIZE="40" MAXLENGTH="100">
- <INPUT TYPE=submit VALUE="Find out"><INPUT TYPE=reset VALUE="Reset">
- </FORM>
生活不易，碼農辛苦
如果您覺得本網站對您的學習有所幫助,可以手機掃描二維碼進行捐贈
------分隔線----------------------------
------分隔線----------------------------
