<% Option Explicit %> <% 'Elimina o armazenamento no Buffer Response.Buffer = true 'Função para consulta de Domínio no sites ww.registro.br Private Function VerificaDominio(Dominio) Dim ObjXML 'Variavel para o Objeto XMLHTTP Dim ResultadoConsulta 'Variavel para guardar retorno da consulta Dim Situacao ' verifica as condições básicas de sintaxe do domínio If Len(Dominio) < 9 THEN Situacao = "Erro ! O domínio deve possuir pelo menos dois caracteres" ElseIf Len(Dominio) > 32 THEN Situacao = "Erro ! O domínio deve possuir no máximo 26 caracteres" Else ' Cria a instância no objeto no servidor Set ObjXML = Server.CreateObject("Microsoft.XMLHTTP") ' Obtem a página do endereço base do registro.br ObjXML.Open "GET", "https://registro.br/cgi-bin/nicbr/whois?qr="&Dominio, False 'Envia a requisição e aguarda a Resposta ObjXML.Send 'Guarda o Retorno em uma variável para comparação posterior ResultadoConsulta = ObjXML.ResponseText 'Pesquisa por palavras chaves no texto para obter o resultado If instr(1,ResultadoConsulta,"inexistente") Then Situacao = "Disponível para Registro" ElseIf instr(1,ResultadoConsulta,"encontrada nenhuma") Then Situacao = "Erro ! Sintaxe Inválida " ElseIf instr(1,ResultadoConsulta,"Como fazer uma consulta") Then Situacao = "Erro ! Sintaxe Inválida " ElseIf instr(1,ResultadoConsulta,"Primeiro") Then Situacao = "Domínio de Primeiro Nível Inválido" Else Situacao = "Dominio já Registrado" End If End If 'retorna o resultado à função VerificaDominio = Situacao End Function %> WebTI - Consulta Domínio

Digite o domínio com a extensão:


www.
"" THEN%> value=<%=Request.QueryString("Dominio")%> <%ELSE%>value="suaempresa.com.br"<%END IF%>>  

<%IF Request.QueryString("Dominio") <> "" THEN%> <%=verificaDominio(Request.QueryString("Dominio"))%><%END IF%>

 

Registrando um domínio você pode ter seu próprio site e emails profissionais com endereço personalizado

Domínios Nacionais

Podem ser registrados por Pessoa F ísica ou Jurídica, porém algumas extensões destinam-se apenas à portadores de CNPJ.

Veja abaixo as formas de registro de domínio nacional que disponibilizamos.

.COM.BR - Comércio em geral
.BLOG.BR - Web logs
.ADM.BR - Administradores
.ADV.BR - Advogados
.ARQ.BR - Arquitetos
.CNT.BR - Contadores
.ENG.BR - Engenheiros
.PSC.BR - Psicólogos

Domínios Internacionais

Não necessitam de CNPJ para serem registrados. Com interface própria para gerenciamento, você pode administrar seu domínio e configurar seus DNS.

Veja abaixo algumas extensões de domínios internacionais que a WebTI registra:

.COM
.NET
.ORG
.INFO