Ir para conteúdo

POWERED BY:

Arquivado

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

Selt

Movenext

Por , em ASP Clássico

Recommended Posts

Selt    0

Selt
Postado

Galera, estou com um probleminha infeliz me pentelhando ... dah uma força ai...

 

erro:

Tipo de erro:Erro de tempo de execução do Microsoft VBScript (0x800A01B6)O objeto não dá suporte para a propriedade ou método: 'Movenext'/editoras/todosliv.asp, line 67

código da página:

<%Option Explicit%><!--#include file="conexao.inc"--><%Response.expires=0Dim conexaodb, strnregistros,rsnregistrosDim strtodosliv, rstodoslivDim rscat,strcat,numcatCall abreconexaoStrnregistros="SELECT count(isbn) As numlivros From Livros"set rsnregistros=conexaodb.execute(strnregistros)Strtodosliv="SELECT * FROM livros Inner join categorias on livros.codcategoria = categorias.codcategoria order by livros.titulo asc"Set rstodosliv=conexaodb.execute(Strtodosliv)Strcat = "SELECT * FROM categorias ORDER BY categoria asc"Set rscat=conexaodb.execute(Strcat)%><html><head><title>Untitled Document</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><link href="estilos.css" rel="stylesheet" type="text/css"></head><body topmargin="0" leftmargin="0"><!--#include file="menusup.htm"--><table border="0" cellpadding="0" cellspacing="0" width="100%"><tr><td width="19%" valign="top" bgcolor="#003366"><!--#include file="menucat.inc"--></td><td width="81%" valign="top" >	<table>  <tr> 	 <td width="56%">    <p class="titulo"><font color="#000000"><img border="0" src="images/ultimas.gif" align="left"> Todos os Títulos</font></p> 	 </td> 	 <td width="44%" valign="middle">    <p class="ft10" align="right"><b> <font color="#CC6600">Foram encontrados <% =rsnregistros.fields("numlivros")%> títulos</font></b></p> 	 </td>  </tr>  <tr> 	 <td width="100%" colspan="2">    <table border="0" cellpadding="0" cellspacing="0" width="100%" height="24">   	 <tr>      <td width="100%" height="24"><hr size="1" color="#C0C0C0"></td>   	 </tr>    </table>    <table border="0" cellpadding="0" cellspacing="1" width="100%">    <tr>    <%   	 Do while not rstodosliv.eof    %>    <td width="5%" bgcolor="#FFFFFF" valign="middle"> <img border="0" src="images/detalhes.gif"></td>    <td width="37%" bgcolor="#FFFFFF" align="left"><p class="ft8"><font color="#000000"><%=rstodosliv.fields("titulo")%></font></p></td>    <td width="33%" bgcolor="#FFFFFF" align="left"><p class="ft8"><font color="#000000"><%=rstodosliv.fields("autor")%></font></p></td>    <td width="14%" bgcolor="#FFFFFF" align="left"><p class="ft8"><font color="#000000"><%=formatnumber(rstodosliv.fields("preco"),2)%></font></p></td>    <td width="14%" bgcolor="#FFFFFF" align="middle"><p align="right"><a href="detalhes.asp?detalhes1=<%=rstodosliv.fields("ISBN")%>"><img border="0" src="images/banner_detalhes.gif"></a></p></td>    </tr>    <tr>    <td width="100%" bgcolor="#FFFFFF" valign="middle" colspan="5"><hr size="1" color="#C0C0C0"></td>    </tr>    <%   	 rstodosliv.fields.MoveNext   	 loop    %>    </table>    </td>  </tr>	</table>	</td></tr></table><!-- #include file="rodape.inc"--></body></html><%rscat.closerstodosliv.closersnregistros.closecall fechaconexaoset rscat=nothingset rstodosliv=nothingset rsnregistros=nothing%>

o que pode ser essa porquera?

Compartilhar este post

Link para o post
Compartilhar em outros sites

biber    0

biber
Postado

brother... creio que você deva fazer uma verificacao de existencia de dados, antes de executar a parada.tipo if rs.eof = true and rs.bof = true Thennao existe dadoselsewhile rs.eof = falseseus dadosrs.movenextwendend if

Compartilhar este post

Link para o post
Compartilhar em outros sites

Selt    0

Selt
Postado

não vi necessidade de verificar se era NULL pq o banco já esta povoado e não haveria a menor possibilidade disso acontecernão sei onde está o problema... achei que tinha esquecido de setar a variavel mas ela está setada.... realmente não sei... :( :( :(

Compartilhar este post

Link para o post
Compartilhar em outros sites

Selt    0

Selt
Postado

CCCCAAARRRAAAALLLLHHHHAAAA..... EU SOU UMA ANTA... to precisando dormi... cassete como não vi isso antes....

 

Sente a idiotisse

   rstodosliv.fields.MoveNext

Nunca iria funfa

 

 

:blink: <_< :blink: <_< :blink:

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