Erro De Lógica....

Abril 1, 2005

To me matando para entender os possíveis erros q eu fiz nesse código, sempre usei isso e nunca deu erro, o erro é o seguinte:

Tipo de erro:

ADODB.Field (0x800A0BCD)

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

o código bem simples:

if not tboferta.eof then

tboferta.movenext

e assim vai

Abril 2, 2005

posta todo o script

Abril 2, 2005

O script inteiro esta aí:

<%
set cmdb = server.createObject("ADODB.Connection")
cmdb.open "DBQ=" & Server.MapPath("/lopel/bdd.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"

bugabuga = "9885117887"
sql = "select*from Ofertas orderby of_cod "
set tboferta = cmdb.execute(sql)


%>

<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body text="#993333" link="#993333" vlink="#993333" alink="#993333" leftmargin="5" topmargin="0" marginwidth="0" marginheight="0">
<%

dim cod1,cod2,cod3
 dim desc1,desc2,desc3
 dim pde1,pde2,pde3
 dim ppara1,ppara2,ppara3
 dim validade1,validade2,validade3
 dim img1,img2,img3

do while not tboferta.eof 
 %>

<table width="620" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr valign="top"> 
    <%
 cod1 = tboferta("of_cod")
 desc1 = tboferta("of_desc")
 pde1 = tboferta("of_pantigo")
 ppara1 = tboferta("of_pnovo")
 validade1 = ""&tboferta("of_dia")&"/"&tboferta("of_mes")&"/"&tboferta("of_ano")&""
 img1 = tboferta("of_img")

%>
    <td width="133" height="150"> 
      <div align="center"><img src="lopel/figuras/of_<%=img1%>" ><br>
        <br>
        <table width="200" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td colspan="2" bgcolor="#FFFFCC"><div align="center"><strong><font color="#993333" size="3" face="Arial, Helvetica, sans-serif"><%=desc1%></font></strong></div></td>
          </tr>
          <tr> 
            <td><font color="#993333" size="2" face="Arial, Helvetica, sans-serif">De:<%=pde1%></font></td>
            <td><font color="#993333" size="2" face="Arial, Helvetica, sans-serif"><strong>Por:<%=ppara1%></strong></font></td>
          </tr>
          <tr> 
            <td colspan="2"><font size="1" face="Arial, Helvetica, sans-serif">Codigo: 
              <%=cod1%></font></td>
          </tr>
          <tr> 
            <td colspan="2"><font size="1" face="Arial, Helvetica, sans-serif">v&aacute;lido 
              at&eacute;: <%=validade1%></font></td>
          </tr>
        </table>
      </div></td>
    <td width="10">&nbsp;</td>
    <%
   
   if not tboferta.eof then

 tboferta.movenext

 cod2 = tboferta("of_cod")
 desc2 = tboferta("of_desc")
 pde2 = tboferta("of_pantigo")
 ppara2 = tboferta("of_pnovo")
 validade2 = ""&tboferta("of_dia")&"/"&tboferta("of_mes")&"/"&tboferta("of_ano")&""
 img2 = tboferta("of_img")
   
   %>
    <td width="133"> 
      <div align="center"><img src="lopel/figuras/of_<%=img2%>" ><br>
        <br>
        <table width="200" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td colspan="2" bgcolor="#FFFFCC"><div align="center"><strong><font color="#993333" size="3" face="Arial, Helvetica, sans-serif"><%=desc2%></font></strong></div></td>
          </tr>
          <tr> 
            <td><font color="#993333" size="2" face="Arial, Helvetica, sans-serif">De:<%=pde2%></font></td>
            <td><font color="#993333" size="2" face="Arial, Helvetica, sans-serif"><strong>Por:<%=ppara2%></strong></font></td>
          </tr>
          <tr> 
            <td colspan="2"><font size="1" face="Arial, Helvetica, sans-serif">Codigo:<%=cod2%></font></td>
          </tr>
          <tr> 
            <td colspan="2"><font size="1" face="Arial, Helvetica, sans-serif">v&aacute;lido 
              at&eacute;: <%=validade2%></font></td>
          </tr>
        </table>
      </div></td>
    <td width="10">&nbsp;</td>
    <%
   
   if not tboferta.eof then
   
     tboferta.movenext
  
     cod3 = tboferta("of_cod")
     desc3 = tboferta("of_desc")
     pde3 = tboferta("of_pantigo")
     ppara3 = tboferta("of_pnovo")
     validade3 = ""&tboferta("of_dia")&"/"&tboferta("of_mes")&"/"&tboferta("of_ano")&""
     img3 = tboferta("of_img")
   
   %>
    <td width="133"> 
      <div align="center"><img src="lopel/figuras/<%=img3%>" ><br>
        <br>
        <table width="200" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td colspan="2" bgcolor="#FFFFCC"><div align="center"><strong><font color="#993333" size="3" face="Arial, Helvetica, sans-serif"><%=desc3%></font></strong></div></td>
          </tr>
          <tr> 
            <td><font color="#993333" size="2" face="Arial, Helvetica, sans-serif">De:<%=pde3%></font></td>
            <td><font color="#993333" size="2" face="Arial, Helvetica, sans-serif"><strong>Por:<%=ppara3%></strong></font></td>
          </tr>
          <tr> 
            <td colspan="2"><font size="1" face="Arial, Helvetica, sans-serif">Codigo: 
              <%=cod3%> </font></td>
          </tr>
          <tr> 
            <td colspan="2"><font size="1" face="Arial, Helvetica, sans-serif">v&aacute;lido 
              at&eacute;: <%=validade3%></font></td>
          </tr>
        </table>
      </div></td>
  </tr>
</table>
<%

end if
end if

loop

 tboferta.close 'fecha o recordset
set tboferta = nothing 'libera o objeto
cmdb.close
set cmdb = nothing

%>


<p>&nbsp;</p>
</body>
</html>

DackAle · Abril 2, 2005

se tem que por o fi ANTES do looping não dentro do looping

porque você veririfca se tem registro, se tiver ai sim ele vai mostrar e fazer o looping

if not rs.eof then

while not rs.eof

Entrar

Erro De Lógica....

Pergunta

Guest Silva ^_^

Link para o comentário

Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

Guest Guest

Link para o comentário

Compartilhar em outros sites

Guest Silva ^_^

Link para o comentário

Compartilhar em outros sites

DackAle

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades