Galera o que pode estar errado.

[masterofdreams 0]

o que pode estar errado, ele passa direto para o executa.asp e não apresenta nada na tela..Agradeço pela ajudar..MASTEROFDREAMSCODE<%'Recupera o que foi digitado no seu campo de busca o input typebusca_01 = Request.form("busca_01 ")'Verifica se o campo não está vazio e se estiver ele redireciona para a pagina de busca ou para onde você quiser pois e so alterar o redirect ou substituir por response write e apresentar uma mensagemIf busca_01 = "" thenresponse.redirect "suapaginadebusca.asp"End if'Conecta ao banco access conforme citou.Set conn = Server.CreateObject ("ADODB.Connection")strconn = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("nomedoseubanco.mdb")conn.open strconn'Faz a busca na tabela de seu banco no caso eu vou buscar no campo nome pois meu banco tem campo nome email data id ip hora.Set rs = Server.CreateObject("ADODB.Recordset")strrs = "Select * from suatabela where nome like'%" & busca_01 & "%' order by login"rs.open strrs, conn'Verifica se foi encontrado algo e se naop dar a respostaIf rs.EOF Thenresponse.write "Nenhum nome encontrado"End if'Pega o total de registro encontradototal = rs.recordcount%><%If erro <> "" ThenResponse.Write mensagemEnd ifDo While not rs.Eof%> <!--Imprime na tela resultado da pesquisa--> <%=nome%><br><%=login%><%=senha%> <%rs.movenextlooprs.closeconn.close%>

[SydBarret 0]

Ta faltando um Execute aí não?? Set RS = conn.Execute(strrs)

[Salgado 4]

Ta faltando um Execute aí não??

 

Set RS = conn.Execute(strrs)

Na verdade não, ele usou RecordSet explicito:

Set rs = Server.CreateObject("ADODB.Recordset")
strrs = "Select * from suatabela where nome like'%" & busca_01 & "%' order by login"
rs.open strrs, conn

Não precisa de execute.

 

masterofdreams: Reveja seu código pois ele não está realmente mandando escrever nada que venha do BD na tela:

Do While not rs.Eof
%>

<!--Imprime na tela resultado da pesquisa-->



<%=nome%><br>
<%=login%>
<%=senha%>


<%
rs.movenext
loop

nome, login e senha, dessa forma ele realmente não está pegando nada do BD.