############################################################################# # # # Pesquisar domínios no Registro.br # # Desenvolvido por Rafael Ferreira Silva - rfsbsb@bol.com.br # # Aprimorado e corrigido por Marcelo Rodrigo - marcelo@comcerteza.com # # Este script foi escrito baseado em PHP4. # # Este script é GNU - Licensa Pública # # Para relatar bugs, sugestões ou se precisar de ajuda com esse ou # # qualquer outro script entre em contato pelo e-mail rfsbsb@bol.com.br # # # # O trabalho do justo conduz à vida; a renda do ímpio, para o pecado. # # Provérbios 10:16 # # SÓ JESUS CRISTO SALVA!! # # # ############################################################################# ?>
if ($dominio != ''){ $ipdo = "http://registro.br/cgi-bin/nicbr/whois?qr=$dominio"; $ipdo_linha = file($ipdo); $linha = ($ipdo_linha[47]); $dom = strtoupper($dominio); $inexist = "inexistente"; $link = "http://registro.br"; if (strpos($linha, $dom) and !strpos($linha, $inexist)){ $abc = 67; echo "O domínio $dominio já está registrado"; }else{ $abc = 47; echo "O domínio $dominio ainda não está registrado"; } echo ''; for ($i = 47;$i <= $abc; $i++){ $preliminar = str_replace("/cgi-bin", "$link/cgi-bin",$ipdo_linha[$i]); echo str_replace("/faq/", "$link/faq/", $preliminar ); } echo '=======================================================