<?
//本例用PHP4实现顶级域名查询
if ($domain) {
if ($domain) {
         //连接到internic域名服务器
        $fp = fsockopen( "rs.internic.net", 43, &$errno, &$errstr, 100);
        if (!$fp) {
          echo  "$errstr ($errno)<br>\n";
        } else {
          fputs($fp, "$domain\r\n");
         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 的注册服务器是 $server:</B><BR>";
                echo  "<PRE>";
                $fp = fsockopen($server, 43, &$errno, &$errstr, 10);
                if(!$fp) {
                        echo  "不能连接到服务器 $server 的43端口.\n";
                        echo  "$errstr ($errno)<br>\n";
                } else {
                        fputs($fp, "$domain\r\n");
                        while(!feof($fp)) {
                            echo fgets($fp,128);
                        }
                        fclose($fp);
                }
        } else    {
                echo( "<b>$domain 没有注册。</b><BR>");
        }
        echo ( "</PRE><BR>");
        }}
?><FORM ACTION="whois.php" METHOD="post">
  只能查询.com,.net和.org的域名<br>
  输入域名:<INPUT TYPE="text" NAME="domain" SIZE="30" MAXLENGTH="100">
  <INPUT TYPE=submit VALUE="查 询">
</FORM>

解决方案 »

  1.   

    if (pos != -1) 
    {
    tempserver = result.Substring(pos,result.Length - pos );
    tempserver = tempserver.Substring(0,tempserver.IndexOf("\n"));
                
     
    result = ConnectWhoisServer(tempserver.Trim(),Domain);
    }
      

  2.   

    用该方法做的域名查询程序已经可以用了!!!
    不用任何第三方控件,直接查询whois数据库欢迎指导:
    单个whois查询:
    http://www.sba.com.cn/advertise/whoisvb.aspx
    多个域名查询:
    http://www.sba.com.cn/advertise/whoisvb3.aspx