Verificando se
Pessoal estou com um pequeno problema neste codigo ja tentei de varias maneira
para conrrigir um erro
www.uol.com diz que esta disponivel para registro
www.redeglobo.com diz que esta disponivel para registro
www.redeglobo.com.br diz que esta disponivel para registro
<%
Response.Buffer = false
Dim criaconexao 'Variavel para o Objeto XMLHTTP
Dim pagina 'Variavel para guardar retorno da consulta
Dim mensagem1 ' variavel
'refeito por lucas forever
If request.form("dominio")<>"" then
' Inseri a url que você está buscando
procuraurl = "http://www." & request.form("dominio")&""&request.form("pont")&""
dominio = request.form("dominio")&""&request.form("pont")&""
' Cria um objeto XML
Set criaconexao = Server.CreateObject("Microsoft.XMLHTTP")
' Conecta-se com a url buscada
criaconexao.Open "GET", ""&procuraurl,false
on error resume next
criaconexao.Send
pagina = criaconexao.getResponseHeader("Date")
' Retorna a busca
if pagina ="" then
mensagem1 = "www."&dominio&"<br><br><strong><font color='#009900'>Parabéns, domínio disponivel para registro<br</font></strong>"
else
mensagem1 = "www."&dominio&"<br><br><strong><font color='#FF0000'>Impossível, domínio já registrado<br></font></strong>"
end if
Set criaconexao = Nothing
end if
%>
<html>
<head>
<title>Registro de dominios</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script type="text/javascript" src="prototype.js"></script>
<script>
function Verifica(event){
var keyCode = event.keyCode ? event.keyCode : event.which ? event.which : event.charCode;
var caract = new RegExp(/[a-z0-9-áéíóúç\b\.-]+$/i);
var caract = caract.test(String.fromCharCode(keyCode));
if(!caract){
//alert("Caracter inválido: " +String.fromCharCode(keyCode));
keyCode=0;
return false;
}
}
function GetDominio(){
if (document.formDom.dominio.value.length < 3){
alert("Por favor, digite um nome para seu domínio !");
document.formDom.dominio.focus();
return false;
}
Element.update("content","<span class='txt2'>Pesquisando, aguarde...</span><br /><br /><img src='images/iga_com_br.gif' width='146' height='12'>");
var myAjax = new Ajax.Updater({success: 'content'}, '/Verifica_domino.asp', { method: 'get', parameters: 'dom='+document.formDom.dominio.value + document.formDom.pont.value});
}
</script>
</head>
<body>
<p align="justify" class="txt">
<form id="formDom" name="formDom" method="post" onSubmit="return GetDominio(this);">
<table border="0" align="center">
<tr><td align="right" class="txt">
<fieldset style="width: 99%;" class="fildweb" >
<legend><strong>Verifique se o domínio que você quer registrar está disponível </strong></legend>
<table border="0" align="center">
<tr><td align="right" class="txt">Domínio:<strong> www.</strong> </td>
<td><label>
<input name="dominio" type="text" class="camp" id="dominio" size="20" maxlength="59" value="<%=request("dominio")%>" onkeypress="return Verifica(event);" />
</label>
<font color="#990000"><strong><font color="#000000">.</font></strong>
<label>
<select id="pont" name="pont" class="text">
<%
lista=".com.br,.com,.net,.adm.br,.br"
MTT="com.br,com,net,adm.br,br"
arrsetor3=split(request("pont"),", ")
arrsetores3=split(lista,",")
mostra_form=split(MTT,",")
for y = LBOUND(mostra_form) to ubound(mostra_form)
response.write"<option value="&arrsetores3(y)
for x= LBOUND(arrsetor3) to ubound(arrsetor3)
if arrsetor3(x) = arrsetores3(y) then response.write " selected" '" selected='selected'"
next
response.write">"&mostra_form(y)&"</option>"&vbcr
next
%>
</select>
</label>
</font></td>
<td><input name="Button" type="submit" class="bot" value="Procurar" />
</td></tr></table>
</fieldset>
</td></tr>
<tr><td>
<div id="content" align="center">
<div align="center">
<%=mensagem1%>
</div>
<div align="left">
<%if pagina = "" then%>
<a href="#">Registrar este domínio</a>
<%end if%>
</div>
</div>
</td></tr>
</table>
</form>
</body>
</html>Discussão (12)
Carregando comentários...