Ir para conteúdo

POWERED BY:

Arquivado

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

douglasmesquita

[Resolvido] Erro de BOF ou EOF

Por , em ASP Clássico

Recommended Posts

douglasmesquita    0

douglasmesquita
Postado

Boa tarde galera, não consegui resolver esse erro. Acredito que seja na parte de repetição. Qd eu vou abrir uma página que não tem cadastro algum dá esse erro. Só que criei um senão para que aparece "notícias não cadastradas". Fico no aguardo

 

Tipo de erro:

ADODB.Field (0x80020009)

BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual.

 

<% 
Option Explicit

'Criando variáveis
Dim localbd, meubd, rsNoticias, rsedicao

'Indicando local do Banco de dados
localbd="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("../bd/bd_aqui.mdb")

'Setando conexões
set meubd=server.createobject("adodb.connection")
set rsNoticias=server.createobject("adodb.recordset")
set rsedicao=server.createobject("adodb.recordset")

meubd.Open localbd

'Esse select seleciona as notícias com a última edição cadastrada
rsedicao.open "Select * from noticias order by edicao desc", meubd

'Esse select seleciona todas as noticias cadastradas
rsNoticias.open "Select * from noticias, noticias_tipo where noticias.tipo="& request.querystring("tipo") &" and noticias.tipo=codtipo order by subtitulo", meubd
%>

<html>
<head>
<title>aQui Online</title>
</head>
<link rel="stylesheet" href="../css/editorias.css" type="text/css" title="Editorias" media="all"/>
<body>
<div id="geral">
	<div id="topo">
			<div id="logo"><img src="../imagens/logo_aqui.jpg" width="201" height="87"></div>
	</div>
	<div id="menu1">
		<ul id="menu">
			<li><a href="templates/capa.asp">Capa</a></li>
			<li><a href="templates/aconteceu.asp">Aconteceu</a></li>
			<li><a href="templates/barramansa.asp">Barra Mansa</a></li>
			<li><a href="templates/cartas.asp">Cartas</a></li>
			<li><a href="templates/csn.asp">CSN</a></li>
			<li><a href="templates/especial.asp">Especial</a></li>
			<li><a href="templates/esportes.asp">Esportes</a></li>
			<li><a href="templates/grampos.asp">Grampos</a></li>
			<li><a href="templates/policia.asp">Polícia</a></li>
			<li><a href="templates/politica.asp">Política</a></li>
			<li><a href="templates/regiao.asp">Região</a></li>
			<li><a href="templates/rioclaro.asp">Rio Claro</a></li>
			<li><a href="templates/social.asp?cod=<%=rsNoticias("codnoticia")%>">Social</a></li>
			<li><a href="templates/voltaredonda.asp">Volta Redonda</a></li>
			<li><a href="templates/tudoaqui.asp">Classificados</a></li>
		</ul>
	</div>
	<div id="conteudo">
		<% 
		'Se houver registros ele mostrará esta parte 
		if not rsNoticias.EOF then 
		%>
		<span class="editoria" id="editoria">| <%=rsNoticias("tipo")%></span>
		<div id="traco"><img src="../imagens/traco.jpg" width="596" height="2"></div>
			<% 
			if rsNoticias("codtipo") = 4 then
			%>
			<% 
			'Repetir as notícias encontradas
			while NOT rsNoticias.EOF 
			%>
			<h4><a href="<%=rsNoticias("tipo2")%>.asp?cod=<%=rsNoticias("codnoticia")%>"><%=rsNoticias("titulo")%></a></h4>
			<p><%=rsNoticias("chamada")%></p>
			<h4 class="traco">- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -	- - 			- - - - - - - - - - - - - - - - - - - - - - - - </h4>
			<%
			rsNoticias.movenext
			wend
			%>
			  <%
			else
			%>
			<% 
			'Repetir as notícias encontradas
			while NOT rsNoticias.EOF 
			%>
			<h4><a href="<%=rsNoticias("tipo2")%>.asp?cod=<%=rsNoticias("codnoticia")%>"><%=rsNoticias("subtitulo")%></a></h4>
			<p><%=rsNoticias("chamada")%></p>
			<h4 class="traco">- - - - - - - - - - - - - - - - - - - - - - - - - - -
			- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - </h4>
			<%
			rsNoticias.movenext
			wend
			%>
			<% end if %>
		<% 
		'Caso o Recordset esteja vazio, ele mostrará a parte abaixo
		else 
		%>
		<p>Não existem notícias cadastradas nessa edição</p>
		<%end if%>
	  </div>
	<div id="rodape">
	<p><a href="#" target="_top"><em><alto></em></a></p>
	<p>© Jornal aQui. Todos os direitos reservados.</p>
	  </div>
</div>		
</body>
</html>
<%
'Fechando as consultas e a conexão
rsNoticias.close
rsEdicao.close
meubd.close
	
'Limpando as variáveis
set meubd= nothing
set rsNoticias= nothing
set rsEdicao= nothing
%>

Compartilhar este post

Link para o post
Compartilhar em outros sites

hargon    64

hargon
Postado

Essa linha if not rsNoticias.EOF then, tem que está antes de tentar acessar qualquer campo da tabela.

 

Mas antes dela você executa a linha:

<li><a href="templates/social.asp?cod=<%=rsNoticias("codnoticia")%>">Social</a></li>

 

 

Está errado...

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito