Either Bof Or Eof Is True

[py2tz]

alguém pode me iluminar

Quanto tem o registro no BD aparece certo, mas quando não existe o que procurei aparece o erro abaixo.

ADODB.Recordset error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

busca2.asp, line 71

Essa linha esta assim:

rs.Absolutepage = pagina

if not (rs.eof and rs.bof) then

response.write "<table width='98%'><tr><td align=left><font face=arial size=4 color=red><b>Resultado da sua Busca pelas Emissoras</b></font></td><td align=right><p align='right'><font class=txt10b>Página " & pagina & "</font></td></tr></table> "

Deveria aparecer algo como REGISTRO NÃO ENCONTRADO

Mas não sei onde inserir, já coloquei em tudo que é lugar, o mais proximo que cheguei foi fazer aparecer a frase de que não encontrou, mas o erro aparece abaixo da frase.

Obrigado por qualquer ajuda.

Fausto

[.Andreia.]

if rs.eof = "" then
response.write "Registro não encontrado"
end if

coloque antes do while e depois da execução da query

[py2tz]

Olá Andreia,

não tem while no script, e onde fica a query? tambem não achei.

[.Andreia.]

Query é a sua consulta SQL, então coloca abaixo do rs.Absolutepage = pagina, veja se funciona

[py2tz]

não funcionou, ficou igual,

<%

id = request("id")

Frequencia = request("Frequencia")

Horario = request("Horario")

Radio = request("Radio")

Cidade = request("Cidade")

Estado = request("Estado")

Pais = request("Pais")

sqlstmt = "SELECT * FROM Tab_Radio WHERE id like '%"& id &"%' and Frequencia Like '%"& Frequencia &"%' and Horario like '%"& Horario &"%' and Radio like '%"& Radio &"%' and Cidade like '%"& Cidade &"%' and Estado like '%"& Estado &"%' and Pais like '%"& Pais &"%' ORDER BY Frequencia, Radio ASC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, conexao, 3, 3

totalrecs = rs.recordcount

iContador=0

Mostrar = Request.Cookies("Mostrar")

if Mostrar <> "" then

rs.pagesize = Mostrar

else

rs.pagesize = 20

end if

if (request("pagina")<>"") then

pagina = cint(request("pagina"))

else

pagina = 1

end if

rs.Absolutepage = pagina

if rs.eof = "" then

response.write "Registro não encontrado"

end if

if not (rs.eof and rs.bof) then

response.write "<table width='98%'><tr><td align=left><font face=arial size=4 color=red><b>Resultado da sua Busca pelas Emissoras</b></font></td><td align=right><p align='right'><font class=txt10b>Página " & pagina & "</font></td></tr></table> "

%>

[.Andreia.]

Tenta assim:

      Set rs = Server.CreateObject("ADODB.Recordset")
      rs.Open sqlstmt, conexao, 3, 3

if rs.eof = "" then
response.write "Registro não encontrado"
end if

[py2tz]

Por incrivel que pareça, não funcionou,

Tá igualzinho.....

[Romero Dias]

você já tentou assim

If rs.Eof or rs.Bof then
Response.Write "Registro não encontrado"
End if

[py2tz]

Beleza, nã sei o que aconteceu, mas acho que estava com alguma coisa residente no servidor ou na minha maquina, porque derrepente funcionou. já tinha feito assim varias vezes e dava pau, cansei e desliguei tudo, no dia seguinte funcionou direito.

No final ficou assim:

<%

id = request("id")

Frequencia = request("Frequencia")

Horario = request("Horario")

Radio = request("Radio")

Cidade = request("Cidade")

Estado = request("Estado")

Pais = request("Pais")

sqlstmt = "SELECT * FROM Tab_Radio WHERE id like '%"& id &"%' and Frequencia Like '%"& Frequencia &"%' and Horario like '%"& Horario &"%' and Radio like '%"& Radio &"%' and Cidade like '%"& Cidade &"%' and Estado like '%"& Estado &"%' and Pais like '%"& Pais &"%' ORDER BY Frequencia, Radio ASC"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.Open sqlstmt, conexao, 3, 3

totalrecs = rs.recordcount

if rs.eof then%>

<p align="center"><font face="arial" size="4">Não Achei nenhum Arquivo com este Nome!!!</font></p>

<%

achei="não"

end if%>

Gente, Brigaduuuuu pela força.

73

Fausto