Ir para conteúdo

POWERED BY:

Arquivado

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

mkboy

Pesquisa em DB

Recommended Posts

Estou tentando fazer uma pesquisa no banco e nao consugi:Tenho um banco com apenas uma tabela.Criei uma página cujo nome é ( r_form.asp ) e nesta página fiz um formulario para consultar o banco.

<form action="r_pesquisa.asp"  method="get"><input type="text" name="consulta" size=20 maxlength=100 ><input type="submit" value="Consultar" name="submit"></form>

E criei a página ( r_pesquisa.asp ) que segue abaixo:

<%pagina = Request.QueryString("p")if pagina = "" thenpagina = 1end if'Seta a variavel pagina como a página em questão na paginaçãoregistros = 20'Seta o número de registros por paginaset conn = Server.CreateObject("ADODB.Connection")strconn = "DBQ=" & Server.MapPath("/cadastro.mdb")conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; " & strconnset RS = Server.Createobject("AdoDB.RecordSet")set RS.ActiveConnection = connRS.cursortype = 3RS.pagesize = registrosStrSQL = "SELECT * FROM info"RS.Open StrSQLif RS.EOF then%><font face="Arial" size="2">Sua pesquisa não retornou nenhum resultado</font><%elseRS.absolutepage = paginaif RS.EOF then%><font face="Arial" size="2">Sua pesquisa não retornou nenhum resultado</font><%fim = 1end ifxx = 0While NOT RS.EOF AND xx < RS.pagesizexx = xx + 1%>#<%=xx%> - <%=RS("texto")%><br><%RS.MoveNextWendend ifif fim = "" thenanterior = pagina - 1proxima = pagina + 1if anterior <> 0 then%><a href="<%=request.servervariables("script_name")%>?p=<%=anterior%>">Página Anterior</a> - <%end if%><a href="<%=request.servervariables("script_name")%>?p=<%=proxima%>">Próxima Página</a><%end ifRS.CloseConn.Close%>

E ocorre o seguinte erro:

#1 - ADODB.Fields error '800a0cc1' ADO não pôde encontrar o objeto na coleção correspondente ao nome ou à referência ordinal solicitada pelo aplicativo. /site/r_pesquisa.asp, line 36

O que errei?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Sua linha 36 é essa:%>#<%=xx%> - <%=RS("texto")%><br><%Na sua tabela tem realmente o campo ("texto")?Verifica se está escrito corretamente

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.