Domain name query code announcement
<? Php
// The motto of the network technology supervisor: the trio must have our teacher. Http://www.ctohome.com
// This code can be said to be very SMART. I modified a small part to make it easier to use.
$ Moreinfolist = array (// storage WHOIS query host connection method
'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 = ',
'Els' => '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 = ',
'G' => '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 = ',
'Lil' => '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 = ',
'Yz' => '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) {// compare domain name suffixes
$ Moreinfo = $ moreinfoname; // terminate the loop immediately when a match exists.
Break;
}
If ($ moreinfo & $ address) {// jump to the WHOIS host
Header ('location: http: // '. $ moreinfo. $ address );
Exit ();
}
Else {
Echo "<form action = $ PHP_SELF method = post>
Enter the Domain name: <input name = address>
<Input type = submit> </form> ";
}
?>
<Html>
<Head>
<Title> whois tool </title>
</Head>
<Body>
<P> explanation by the network technical director in Chinese </a>. </p>
<Hr/>
<Address> http://www.ctohome.com </address>
</Body>
</Html>
<? Php
Highlight_file ("whois. php ");
?>