[Resolvido] Either BOF or EOF is True

Loko da Web · Janeiro 26, 2009

Boa tarde!

Aparece esse erro:

ADODB.Recordset error '800a0bcd' 

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

Sei o significado desse erro (registros inexistentes),... O problema é que eu quero é que a mensagem de "nada encontrado" fique em cima do while. e nao embaixo da select. Tentei dessa forma:

<%
 If rs.EOF Then 
%>
nada encontrado
<%
end if
%>
<%

rs.absolutepage = PagAtual
   count = 0
   do while not rs.eof and count < rs.pagesize
   if somando = 0 then
%>
<%=rs("nome")%>
<% count = count + 1
   somando = 1

elseif somando = 1 then

%>
<%=rs("nome")%>
<% count = count + 1
   somando = 0
end if
   rs.movenext
   loop
%>

<%

rs.absolutepage = PagAtual
   count = 0
   do while not rs.eof and count < rs.pagesize
   if somando = 0 then
%>
<%=rs("nome")%>
<% count = count + 1
   somando = 1

elseif somando = 1 then

%>
<%=rs("nome")%>
<% count = count + 1
   somando = 0
end if
   rs.movenext
   loop
 If rs.EOF Then 
response.write "nada encontrado"
end if
%>

Tentei assim tbem:

Set RS= Server.CreateObject("ADODB.Recordset")
sql = "SELECT fotos.nome, fotos.nome_original, fotos.idcat, fotos.id, fotos.thumb, fotos.ano, fotos.detalhe, categorias.nome_cat FROM fotos INNER JOIN categorias ON fotos.idcat = Categorias.id WHERE fotos.idcat= " & idcat  & " order by fotos.data_lancamento desc"
RS.Open SQL, conn, 3
 If rs.EOF Then 
response.write "nada encontrado"
end if

Aparece o mensagem "nada encontrado", porem o erro persiste, a linha apontada pelo erro:

RS.MoveFirst

Pesquisei horrores, e tentei outras soluções, mas os erros persistem....

hargon · Janeiro 26, 2009

Tenta assim:

<%
If rs.EOF Then
%>
nada encontrado
<%
Else
   rs.absolutepage = PagAtual
   count = 0
   do while not rs.eof and count < rs.pagesize
   if somando = 0 then
%>
<%=rs("nome")%>
<% count = count + 1
	  somando = 1

	elseif somando = 1 then

%>
<%=rs("nome")%>
<% count = count + 1
   somando = 0
   end if
   rs.movenext
   loop
end if
%>

Loko da Web · Janeiro 27, 2009

Tenta assim:

<%
If rs.EOF Then
%>
nada encontrado
<%
Else
   rs.absolutepage = PagAtual
   count = 0
   do while not rs.eof and count < rs.pagesize
   if somando = 0 then
%>
<%=rs("nome")%>
<% count = count + 1
	  somando = 1

	elseif somando = 1 then

%>
<%=rs("nome")%>
<% count = count + 1
   somando = 0
   end if
   rs.movenext
   loop
end if
%>

hargon, ainda não deu certo !!!!! Continua dando o mesmo erro...

hargon · Janeiro 27, 2009

Posta o código da sua página inteira. Se for muito grande, posta o que vem antes até o final desse IF. Marque a linha com erro.

A mensagem de erro continua a mesma, correto?

Loko da Web · Janeiro 27, 2009

Posta o código da sua página inteira. Se for muito grande, posta o que vem antes até o final desse IF. Marque a linha com erro.

A mensagem de erro continua a mesma, correto?

A parte da chamada do bd e tabelas, e tbem da request da paginacao...

<%
idcat=request.querystring("idcat")
nome_cat=request.querystring("nome_cat")
cat=request.querystring("cat")
idfoto=request.querystring("idfoto")
PagAtual = Request.QueryString("PagAtual")

Set Conn= server.createobject("adodb.connection")
DSNtest = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("db/filmes.mdb")
Conn.Open DSNtest

Set RS= Server.CreateObject("ADODB.Recordset")
sql = "SELECT fotos.nome, fotos.nome_original, fotos.idcat, fotos.id, fotos.thumb, fotos.ano, fotos.detalhe, 

categorias.nome_cat FROM fotos INNER JOIN categorias ON fotos.idcat = Categorias.id WHERE fotos.idcat= " & idcat  & " order 

by fotos.data_lancamento desc"
RS.Open SQL, conn, 3

Const NumPorPage = 12

   Dim PagAtual

   IF Request.QueryString("PagAtual") = "" Then
			   PagAtual = 1 
		 Else
				PagAtual = Request.QueryString("PagAtual")
   End If

	RS.CacheSize = NumPorPage
	RS.MoveFirst				
	RS.PageSize = NumPorPage	

	Dim TotalPages			  
	TotalPages = RS.PageCount

	RS.AbsolutePage = PagAtual  

%>

A linha que acusa o erro:

RS.MoveFirst

A parte do loop (aqui eu fiz em colunas, são 3 no total)

<%
If rs.EOF Then
%>
nada encontrado
<%
Else
rs.absolutepage = PagAtual
   count = 0
   do while not rs.eof and count < rs.pagesize
   if somando = 0 then

   '*** Inicia a primeira coluna
%>

<tr>
<td valign="top" width="191" align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr><td align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr>
<td align="center" valign="top"><div class="moldura">
<a href="ver_filme.asp?idcat=<%=RS("idcat")%>&idfoto=<%=RS("id")%>"><img border="0" src="<%=rs("thumb")%>" width="82" 

height="120"></a></td></tr>
<tr><td><img src="images/barra04.gif" border="0"></td></tr>
<tr><td valign="top" align="center" class="text"><b><%=resumindo02(rs("nome"), 27)%></td></tr>
<tr><td valign="top" align="center" class="text"><i><%=resumindo02(rs("nome_original"), 20)%>, <%=rs("ano")%></td></tr>
<tr><td><img src="images/barra06.gif" border="0"></td></tr>
<tr><td valign="top" align="left">
<table border="0" cellpadding="5" cellspacing="0">
<tr><td class="text" align="center">
<%=resumindo(rs("detalhe"), 80)%></td></tr></table></tr>
</table></td>
<td valign="top"><img src="images/barra05.gif"></td></td></tr>
<tr><td colspan="2"><img src="images/barra07.gif"></td></table></td>

<% count = count + 1
   somando = 1

elseif somando = 1 then

   '*** Inicia a segunda coluna
%>

<td valign="top" width="191" align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr><td align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr>
<td align="center" valign="top"><div class="moldura">
<a href="ver_filme.asp?idcat=<%=RS("idcat")%>&idfoto=<%=RS("id")%>"><img border="0" src="<%=rs("thumb")%>" width="82" 

height="120"></a></td></tr>
<tr><td><img src="images/barra04.gif" border="0"></td></tr>
<tr><td valign="top" align="center" class="text"><b><%=resumindo02(rs("nome"), 27)%></td></tr>
<tr><td valign="top" align="center" class="text"><i><%=resumindo02(rs("nome_original"), 20)%>, <%=rs("ano")%></td></tr>
<tr><td><img src="images/barra06.gif" border="0"></td></tr>
<tr><td valign="top" align="left">
<table border="0" cellpadding="5" cellspacing="0">
<tr><td class="text" align="center">
<%=resumindo(rs("detalhe"), 80)%></td></tr></table></tr>
</table></td>
<td valign="top"><img src="images/barra05.gif"></td></td></tr>
<tr><td colspan="2"><img src="images/barra07.gif"></td></table></td>

<% count = count + 1
   somando = 2

elseif somando = 2 then

   '*** Inicia a terceira coluna
%>

<td valign="top" width="191" align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr><td align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr>
<td align="center" valign="top"><div class="moldura">
<a href="ver_filme.asp?idcat=<%=RS("idcat")%>&idfoto=<%=RS("id")%>"><img border="0" src="<%=rs("thumb")%>" width="82" 

height="120"></a></td></tr>
<tr><td><img src="images/barra04.gif" border="0"></td></tr>
<tr><td valign="top" align="center" class="text"><b><%=resumindo02(rs("nome"), 27)%></td></tr>
<tr><td valign="top" align="center" class="text"><i><%=resumindo02(rs("nome_original"), 20)%>, <%=rs("ano")%></td></tr>
<tr><td><img src="images/barra06.gif" border="0"></td></tr>
<tr><td valign="top" align="left">
<table border="0" cellpadding="5" cellspacing="0">
<tr><td class="text" align="center">
<%=resumindo(rs("detalhe"), 80)%></td></tr></table></tr>
</table></td>
<td valign="top"><img src="images/barra05.gif"></td></td></tr>
<tr><td colspan="2"><img src="images/barra07.gif"></td></table></td></tr>

<% count = count + 1
   somando = 0

end if

   rs.movenext
   loop
end if
%>

O erro é o mesmo:

ADODB.Recordset error '800a0bcd' 

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

Ted k' · Janeiro 27, 2009

If rs.EOF Then
response.write("nada")
else
....

tem que ser logo abaixo do SQL

hargon · Janeiro 27, 2009

RS.MoveFirst está no lugar errado.

If rs.EOF Then
	response.write("nada")
Else
	RS.MoveFirst
'....

Loko da Web · Janeiro 27, 2009

Funcionou até funcionou,.... mas só fica aquela mensagem de "nada encontrado", gostaria que fosse aparecer o resto do site.

A minha ideia era que a mensagem nada encontrado "substituisse" o loop,... que nem esse caso:

<%
If RS.EOF Then
%>
<tr><td align="center" class="text">Nenhum registro cadastrado !</td></tr>
<tr><td> </td></tr>
<%
end if
%>
<%
do while not rs.EOF
%>
<tr><td class="text2" align="center"><%=rs("nome_cat")%></a></td></tr>
<%
  rs.MoveNext
Loop
%>

hargon · Janeiro 27, 2009

É só colocar um ELSE e o IF dentro.

<%
If RS.EOF Then
%>
<tr><td align="center" class="text">Nenhum registro cadastrado !</td></tr>
<tr><td> </td></tr>
<%
else
%>
<%
do while not rs.EOF
%>
<tr><td class="text2" align="center"><%=rs("nome_cat")%></a></td></tr>
<%
  rs.MoveNext
Loop
%>
<%
end if
%>

Loko da Web · Janeiro 27, 2009

É só colocar um ELSE e o IF dentro.

<%
If RS.EOF Then
%>
<tr><td align="center" class="text">Nenhum registro cadastrado !</td></tr>
<tr><td> </td></tr>
<%
else
%>
<%
do while not rs.EOF
%>
<tr><td class="text2" align="center"><%=rs("nome_cat")%></a></td></tr>
<%
  rs.MoveNext
Loop
%>
<%
end if
%>

Hargon, continua dando o mesmo erro... a unica solução que deu certo foi essa:

If rs.EOF Then
	response.write("nada")
Else
	RS.MoveFirst

Mas, dessa forma fica "horrivel", pois só vai aparecer nada encontrado e mais nada...

Mário Monteiro · Janeiro 27, 2009

mas era para continuar carregando o site

o que tem abaixo desse loop ai?

Loko da Web · Janeiro 27, 2009

mas era para continuar carregando o site

o que tem abaixo desse loop ai?

Mario abaixo do loop, esta a paginacao:

<table BORDER="0" cellspacing="0" cellpadding="0" width=575>
<tr><td colspan="2"> </td></tr>
<tr><td class="text">Foram encontrado(s) <b><%=totalreg%></b> filme(s)</td>
<td class="text" align="right">Página <b><%=PagAtual%></b> de <b><%=Totalpages%></b></td></tr>
<tr><td colspan="2"> </td></tr>
<tr><td colspan="2" align="center">
<table BORDER="0" cellspacing="0" cellpadding="0" align="center">
<tr><td align="center">
<%
var01 = Len(PagAtual) 'Lê o tamanho do numero
var02 = var01 - 1 'subtrai um da variavel , retirando o digito menos sig.
var03 = Left(PagAtual,var02) 'obtem os digitos mais  sig. do numero
var04 = Right(PagAtual,1)	'obtem o digito menos sig. do numero
var05 = var03 & 0 ' Acrecenta ZERO no final
IF var04 <> 0 THEN		' condição se o digito menos sig. é Zero
	inicial = var05 + 1
	final = inicial + 9  
	ELSE
	inicial = var05 - 9  
	final = var05
END IF

indice_i = var04 - 1 'ultimo digito  - 1
indice_f = 10 - var04 ' 10 - digito menos sig.


' If CInt(inicial) < 1 Then inicial = 1
	 
If CInt(final) > CInt(TotalPages) Then final = TotalPages

'------------------------------------------------------------------------------


IF PagAtual > 1 THEN 

'Se for a primeira página, Mostra apenas o botão Próximo e Ultima
	  Response.Write("<div class='pag-navegacao'>") 
	  Response.Write("<a href='todos_filmes.asp?PagAtual=" &  1 & "&idcat=" & idcat & "'>")
	  Response.Write("Primeira") 
	  Response.Write("</a></div>  ")
	  
	  Response.Write("<div class='pag-navegacao'>") 
	  Response.Write("<a href='todos_filmes.asp?PagAtual=" & PagAtual - 1 & "&idcat=" & idcat & "'>")
	  Response.Write("Anterior") 
	  Response.Write("</a></div>  ")

	  IF PagAtual > 10 THEN

	   Response.Write("<div class='pag-pontinhos'>") 
	   Response.Write("<a href='todos_filmes.asp?PagAtual=" & inicial - 1 & "&idcat=" & idcat & "'>")
	   Response.Write("...") 
	 Response.Write("</a></div>  ")

		  ELSE

		 Response.Write("<div class='pag-pontinhos'>") 
	   Response.Write("....") 
	   Response.Write("</div>  ")

	END IF

  Else

	  Response.Write("<div class='pag-navegacao-off'>") 
	  Response.Write("Primeira") 
	  Response.Write("</div>  ")

	  Response.Write("<div class='pag-navegacao-off'>") 
	  Response.Write("Anterior") 
	  Response.Write("</div>  ")

	  Response.Write("<div class='pag-pontinhos'>") 
	  Response.Write("...") 
	  Response.Write("</div>  ")

End If

'---------------------- NUMEROS  ---------------------------

For i = inicial To final
	 If CInt(i)=CInt(PagAtual) Then
		 Response.Write "<div class='pag-atual'> " & i & " </div>  "
	 END IF
	 If CInt(i) < CInt(PagAtual) Then
	  Response.Write "<div class='pag-link'><a href='todos_filmes.asp?PagAtual=" & i & "&idcat=" & idcat & "'> " & i & " </a></div>  "
	 END IF
	 If CInt(i) > CInt(PagAtual) Then
		 Response.Write "<div class='pag-link'><a href='todos_filmes.asp?PagAtual=" & i & "&idcat=" & idcat & "'> " & i & " </a></div>  "
  END IF
Next

'------------------------------------------------------

IF CInt(PagAtual) <> CInt(TotalPages) THEN 


p1 = Left(PagAtual,var02) 
p2 = Left(TotalPages,var02)
p3 = Left(TotalPages,var02) & 0


'##### CONDIÇÕES ########
'digitos mais significativos do Numero com 1 no fim > PagAtual
'EX:  21   [ 22 ]  23   24  25		 2 com 1 => 21 > 22 (F)
'OU
'PagAtual <= 10	  E	TotalPages > 10
'EX:  ... 1  2  3  4 [ 5 ]  6  ...			  5 <= 10 (V)  E   6 > 10 (F) 

IF (p1 > PagAtual) or ((PagAtual <= 10) and (TotalPages > 10)) THEN	


	   Response.Write("<div class='pag-pontinhos'>")
	   Response.Write("<a href='todos_filmes.asp?PagAtual=" & final + 1 & "&idcat=" & idcat & "'>")
	   Response.Write("...")
	   Response.Write("</a></div>  ") 

		 ELSE

	   Response.Write("<div class='pag-pontinhos'>")
	   Response.Write("...") 
	   Response.Write("</div>  ")

   END IF

	  Response.Write("<div class='pag-navegacao'>")
	  Response.Write("<a href='todos_filmes.asp?PagAtual=" & PagAtual + 1 & "&idcat=" & idcat & "'>")
	  Response.Write("Próxima")
	  Response.Write("</a></div>  ") 

	  Response.Write("<div class='pag-navegacao'>")
	  Response.Write("<a href='todos_filmes.asp?PagAtual=" & TotalPages & "&idcat=" & idcat & "'>")
	  Response.Write("Última")
	  Response.Write("</a></div>  ")		

 ELSE

	  Response.Write("<div class='pag-pontinhos'>")
	  Response.Write("...") 
	  Response.Write("</div>  ")

	  Response.Write("<div class='pag-navegacao-off'>")
	  Response.Write("Próxima") 
	  Response.Write("</div>  ")

	  Response.Write("<div class='pag-navegacao-off'>")
	  Response.Write("Última") 
	  Response.Write("</div>  ")
End If 
Rs.Close  
Set RS = Nothing
Conn.Close	  
Set Conn = Nothing	   

%>

hargon · Janeiro 27, 2009

Analisando todos os HTML postados acim, o que dá a entender é que o layout depende da existência de informações no banco para aparecer.

Não vi uma forma de adaptar isso ao seu código, por está todo em tabela.

Se possível poste a URL dessa página para que possamos ver melhor do que se trata, pois a principio não vi nenhuma solução simples.

Loko da Web · Janeiro 27, 2009

Analisando todos os HTML postados acim, o que dá a entender é que o layout depende da existência de informações no banco para aparecer.

Não vi uma forma de adaptar isso ao seu código, por está todo em tabela.

Se possível poste a URL dessa página para que possamos ver melhor do que se trata, pois a principio não vi nenhuma solução simples.

Este link contem informações....

http://www.aspet.somee.com/sistema%5Flocad...19&cat=Ação

Se clicar no link Terror, ira apresentar o erro.

hargon · Janeiro 27, 2009

Mas esse erro você disse que já havia solucionado no post #8.

Essa página que você disse para acessar está com o código da forma que postei no post #9?

Loko da Web · Janeiro 27, 2009

Mas esse erro você disse que já havia solucionado no post #8.

Essa página que você disse para acessar está com o código da forma que postei no post #9?

Funcionou dessa forma (mostra apenas a mensagem "nada encontrado" e nada mais), verifique o link abaixo e vera a mensagem...

http://www.aspet.somee.com/sistema%5Flocad...&cat=Terror

If rs.EOF Then
	response.write("nada encontrado")
Else
	RS.MoveFirst

e nao dessa forma:

<%
If RS.EOF Then
%>
<tr><td align="center" class="text">Nenhum registro cadastrado !</td></tr>
<tr><td> </td></tr>
<%
else
%>
<%
do while not rs.EOF
%>
<tr><td class="text2" align="center"><%=rs("nome_cat")%></a></td></tr>
<%
  rs.MoveNext
Loop
%>
<%
end if
%>

Dessa forma acima é a que eu queria que funcionasse.

hargon · Janeiro 27, 2009

Tenta assim:

<%
If RS.EOF Then
%>
<tr><td align="center" class="text">Nenhum registro cadastrado !</td></tr>
<tr><td> </td></tr>
<%
else
RS.MoveFirst
%>
<%
do while not rs.EOF
%>
<tr><td class="text2" align="center"><%=rs("nome_cat")%></a></td></tr>
<%
  rs.MoveNext
Loop
%>
<%
end if
%>

Loko da Web · Janeiro 27, 2009

Não esta dando certo,...Experimentei remover o rs.movefist abaixo da sql pra ver o que dava, ele aponta o erro em uma nova linha

RS.AbsolutePage = PagAtual

veja como esta:

<%
If RS.EOF Then
%>
<tr><td align="center" class="text">Nenhum registro cadastrado !</td></tr>
<tr><td> </td></tr>
<%
else
RS.MoveFirst

rs.absolutepage = PagAtual
   count = 0
   do while not rs.eof and count < rs.pagesize
   if somando = 0 then

   '*** Inicia a primeira coluna
%>

<tr>
<td valign="top" width="191" align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr><td align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr>
<td align="center" valign="top"><div class="moldura">
<a href="ver_filme.asp?idcat=<%=RS("idcat")%>&idfoto=<%=RS("id")%>"><img border="0" src="<%=rs("thumb")%>" width="82" 

height="120"></a></td></tr>
<tr><td><img src="images/barra04.gif" border="0"></td></tr>
<tr><td valign="top" align="center" class="text"><b><%=resumindo02(rs("nome"), 27)%></td></tr>
<tr><td valign="top" align="center" class="text"><i><%=resumindo02(rs("nome_original"), 20)%>, <%=rs("ano")%></td></tr>
<tr><td><img src="images/barra06.gif" border="0"></td></tr>
<tr><td valign="top" align="left">
<table border="0" cellpadding="5" cellspacing="0">
<tr><td class="text" align="center">
<%=resumindo(rs("detalhe"), 80)%></td></tr></table></tr>
</table></td>
<td valign="top"><img src="images/barra05.gif"></td></td></tr>
<tr><td colspan="2"><img src="images/barra07.gif"></td></table></td>

<% count = count + 1
   somando = 1

elseif somando = 1 then

   '*** Inicia a segunda coluna
%>

<td valign="top" width="191" align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr><td align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr>
<td align="center" valign="top"><div class="moldura">
<a href="ver_filme.asp?idcat=<%=RS("idcat")%>&idfoto=<%=RS("id")%>"><img border="0" src="<%=rs("thumb")%>" width="82" 

height="120"></a></td></tr>
<tr><td><img src="images/barra04.gif" border="0"></td></tr>
<tr><td valign="top" align="center" class="text"><b><%=resumindo02(rs("nome"), 27)%></td></tr>
<tr><td valign="top" align="center" class="text"><i><%=resumindo02(rs("nome_original"), 20)%>, <%=rs("ano")%></td></tr>
<tr><td><img src="images/barra06.gif" border="0"></td></tr>
<tr><td valign="top" align="left">
<table border="0" cellpadding="5" cellspacing="0">
<tr><td class="text" align="center">
<%=resumindo(rs("detalhe"), 80)%></td></tr></table></tr>
</table></td>
<td valign="top"><img src="images/barra05.gif"></td></td></tr>
<tr><td colspan="2"><img src="images/barra07.gif"></td></table></td>

<% count = count + 1
   somando = 2

elseif somando = 2 then

   '*** Inicia a segunda coluna
%>

<td valign="top" width="191" align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr><td align="left">
<table valign="top" border="0" cellspacing="0" cellpadding="0" width="191" align="left">
<tr>
<td align="center" valign="top"><div class="moldura">
<a href="ver_filme.asp?idcat=<%=RS("idcat")%>&idfoto=<%=RS("id")%>"><img border="0" src="<%=rs("thumb")%>" width="82" 

height="120"></a></td></tr>
<tr><td><img src="images/barra04.gif" border="0"></td></tr>
<tr><td valign="top" align="center" class="text"><b><%=resumindo02(rs("nome"), 27)%></td></tr>
<tr><td valign="top" align="center" class="text"><i><%=resumindo02(rs("nome_original"), 20)%>, <%=rs("ano")%></td></tr>
<tr><td><img src="images/barra06.gif" border="0"></td></tr>
<tr><td valign="top" align="left">
<table border="0" cellpadding="5" cellspacing="0">
<tr><td class="text" align="center">
<%=resumindo(rs("detalhe"), 80)%></td></tr></table></tr>
</table></td>
<td valign="top"><img src="images/barra05.gif"></td></td></tr>
<tr><td colspan="2"><img src="images/barra07.gif"></td></table></td></tr>

<% count = count + 1
   somando = 0

end if

   rs.movenext
   loop
end if
%>

hargon · Janeiro 27, 2009

Mas qual erro ele aponta?

Existem vários tipos de erro, como por exemplo a variável PagAtual ser nula.

Loko da Web · Janeiro 27, 2009

Mas qual erro ele aponta?

Existem vários tipos de erro, como por exemplo a variável PagAtual ser nula.

É o mesmo erro de sempre...

ADODB.Recordset error '800a0bcd'

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

o que eu fiz foi um teste, como eu coloquei o rs.movefirst abaixo do else que fica acima do while, testei retirar o rs.movefisrt abaixo do sql,... e apresentou o erro acima, apontado a linha RS.AbsolutePage = PagAtual.

só mais uma coisa hargon, você ja utilizou esta paginacao (tem aqui no forum mesmo) ???? Pq quando eu peguei ele nao tinha essa instrução para verificar se EOF or BOF é verdadeiro ou falso.

E mais, a respeito desse post:

Analisando todos os HTML postados acim, o que dá a entender é que o layout depende da existência de informações no banco para aparecer.

Não vi uma forma de adaptar isso ao seu código, por está todo em tabela

o que você quis dizer com isso ???

Arquivado

[Resolvido] Either BOF or EOF is True

Recommended Posts

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

Ted k' 126

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

Mário Monteiro 179

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

Loko da Web 1