Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

webcore

[Resolvido] asp + ajax

Recommended Posts

Boa tarde pessoal, fui usar uma pag em ajax q tinha, tentei adapta-la mas nao rola

qdo clico o botao nada acontece

 

default.asp

 

<form>

<input type="text" name="telefone" class="inp" />

<input type="submit" value="Pesquisar" class="btn"onclick="Carrega(this.value)" /> // aqui ja tentei com onsubmit tbm?

</form>

.....

 

<div id="txt">

retorno consulta

</div>

 

CODE
var xmlHttp

 

function Carrega(str)

{

xmlHttp=GetXmlHttpObject();

if (xmlHttp==null)

{

alert ("Seu Navegador Não Suporta AJAX!");

return;

}

var url="get.asp";

url=url+"?q="+str;

url=url+"&sid="+Math.random();

xmlHttp.onreadystatechange=stateChanged;

xmlHttp.open("GET",url,true);

xmlHttp.send(null);

}

 

function stateChanged()

{

if (xmlHttp.readyState==4)

{

document.getElementById("txt").innerHTML=xmlHttp.responseText;

}

}

 

function GetXmlHttpObject()

{

var xmlHttp=null;

try

{

// Firefox, Opera 8.0+, Safari

xmlHttp=new XMLHttpRequest();

}

catch (e)

{

// Internet Explorer

try

{

xmlHttp=new ActiveXObject("Msxml2.XMLHTTP");

}

catch (e)

{

xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");

}

}

return xmlHttp;

}

 

get.asp

CODE

<%

Response.CharSet="ISO-8859-1"

response.expires=-1

sql="SELECT * FROM cli_cadastrados WHERE telefone="

sql=sql & "'" & request.querystring("q") & "'"

%>

 

<!--#include file="utils/open.asp" -->

 

<%

set rs = Server.CreateObject("ADODB.recordset")

rs.Open sql, Conn

%>

 

<%

If rs.EOF Then

Response.Write"Cliente Não Cadastrado"

Else if

Response.Write(rs("telefone")) &"<br>"

Response.Write(rs("nome")) &"<br>"

End If

%>

 

<%

rs.Movenext

Wend

rs.Close

Set Conn = Nothing

%>

 

hahha essa é pra segunda, acho.. domingão , chuva... todo mundo debaixo das cobertas

abraços

Compartilhar este post


Link para o post
Compartilhar em outros sites

Na página get.asp, o código não seria assim:

<%
Response.CharSet="ISO-8859-1"
response.expires=-1
sql="SELECT * FROM cli_cadastrados WHERE telefone="
sql=sql & "'" & request.querystring("q") & "'"
%>

<!--#include file="utils/open.asp" -->

<%
set rs = Server.CreateObject("ADODB.recordset")
rs.Open sql, Conn

If rs.EOF Then
   Response.Write"Cliente Não Cadastrado"
Else
   Response.Write(rs("telefone")) &"<br>"
   Response.Write(rs("nome")) &"<br>"
End If

rs.Close
Set Conn = Nothing
%>
Isso se não tiver mais de um registro com o telefone digitado.

Compartilhar este post


Link para o post
Compartilhar em outros sites

valeu resolvido...tava passando um campo errado no ajax...atenção garoto, atenção rs.. minha mãe sempre dizia isso...rs valeu

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.