[Resolvido] erro '80020009'

betobto · Outubro 2, 2010

olá estou com esse erro... e nao encontro a solução.... poderiam me ajudar....

linha 72 é a primeira liha :

<% if wrs("categoria") = "5" then %>

<% if wrs("categoria") = "5" then %>
  <img src="imagens/titulo_radical_mais_radical.png" width="800" height="38" />
<% ELSEIF wrs("categoria") = "1" then %>
  <img src="imagens/titulo_campo_mais_campo.png" width="800" height="38" />
<% ELSEIF wrs("categoria") = "2" then %>
  <img src="imagens/titulo_quadra_mais_quadra.png" width="800" height="38" />
<% ELSEIF wrs("categoria") = "3" then %>
  <img src="imagens/titulo_agua_mais_agua.png" width="800" height="38" />
<% ELSEIF wrs("categoria") = "4" then %>
  <img src="imagens/titulo_motor_mais_motor.png" width="800" height="38" />
<% ELSEIF wrs("categoria") = "6" then %>
  <img src="imagens/titulo_turismo_mais_turismo.png" width="800" height="38" />
<% END IF %>

estou usando este messmo codigo na pagina soh q para mostrar imagem diferente

hargon · Outubro 2, 2010

Posta o erro completo, porque não deu para identificar nada, apenas que você pode está comparando um número com uma string.

betobto · Outubro 2, 2010

eu que estava errando em uma string....

sabe o erro anterior q postei do movenext.....

eu solicitei para mostrar a partir da segunda noticia e para mostrar a partir da sexta noticia?

tem como fazer isso????

augustoclaro · Outubro 2, 2010

for i=1 to 5

if not rs.eof then

rs.movenext

end if

betobto · Outubro 2, 2010

for i=1 to 5

if not rs.eof then

rs.movenext

end if

next

nao deu certo nao ele aparece desde o primeiro

hargon · Outubro 2, 2010

Como está seu código atualmente? Posta tudo para entendermos. Acredito que uma simples adaptação resolva.

betobto · Outubro 2, 2010

segue o codigo completo da page

é a partir daqui que é para aparecer apartir da 6 registro

<% for i=1 to 5
if not wrs.eof then %>

<!--#include file="abrir.asp" -->
<link rel="stylesheet" type="text/css" href="css/global.css"/>

      	<% wcod= request("txtcat")
			wsql = "SELECT * FROM tblNoticias WHERE exibir = 'S' AND categoria="&wcod&" ORDER BY cod ASC"
			SET wrs = wcon.EXECUTE(wsql)
			IF wrs.BOF THEN
		%>
        Nenhum registro em nossa base de dados para essa categoria
		<% ELSE %>
        
  <table width="800" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td width="770">
        <% if wrs("categoria") = "5" then %>
    	    <img src="imagens/titulo_radical.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "1" then %>
	        <img src="imagens/titulo_campo.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "2" then %>
            <img src="imagens/titulo_quadra.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "3" then %>
            <img src="imagens/titulo_agua.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "4" then %>
            <img src="imagens/titulo_motor.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "6" then %>
            <img src="imagens/titulo_turismo.png" width="800" height="38" />
        <% END IF %>
   
      </td>
    </tr>
    <tr>
      <td valign="top" style="padding-top:10px;">
      <div id="noticiasPage">
      
		<div class="noticiasPageTodas-principal">
        	<div class="noticiasPageTodas-principal-titulo"><%=wrs("titulo")%></div>
            <div class="noticiasPageTodas-principal-imagem"><img src="img/noticias/<%=wrs("fotoprin")%>" /></div>
        	<div class="noticiasPageTodas-principal-chamada"><a href="index.asp?pagina=noticiasDesc&cod=<%=wrs("cod")%>"><%=wrs("brevedescricao")%> ...[Leia mais]</a></div>        
        </div>
        
        <% If Not wrs.Eof Then
    		wrs.MoveNext
    			If Not wrs.Eof Then
        			While Not wrs.Eof %>
        <div class="noticiasPageTodas-mais-noticias-destaque"><a href="index.asp?pagina=noticiasDesc&cod=<%=wrs("cod")%>">
        	<div class="noticiasPageTodas-mais-noticias-destaque-imagem"><img src="img/noticias/<%=wrs("fotomedia")%>" /></div>
            <div class="noticiasPageTodas-mais-noticias-destaque-titulo"><%=wrs("titulo")%></div>
            <div class="noticiasPageTodas-mais-noticias-destaque-leia-mais">[Leia mais]</div></a>
        </div>
		<% 			wrs.MoveNext
        		Wend
    		End If
		End If %>
        
      </div>
      <div id="noticiasPageSep"></div>
      
      <div id="noticiasPageTodas-ads"></div>
      
      <div id="noticiasPageSep"></div>
      <div id="noticiasPage">
       	<% wcod= request("txtcat")
			wsql = "SELECT TOP 6 * FROM tblNoticias WHERE exibir = 'S' AND categoria="&wcod&" ORDER BY cod ASC"
			SET wrs = wcon.EXECUTE(wsql)
			IF wrs.BOF THEN
		%>
        Nenhum registro em nossa base de dados para essa categoria
		<% ELSE %>

          <div class="noticias-todas-noticias-arquivos">
      	
    	    <div class="noticias-todas-noticias-arquivos-titulo">
            <% if wrs("categoria") = "5" then %>
            	<a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_radical_mais_radical.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "1" then %>
            	<a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
          		<img src="imagens/titulo_campo_mais_campo.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "2" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_quadra_mais_quadra.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "3" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_agua_mais_agua.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "4" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_motor_mais_motor.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "6" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_turismo_mais_turismo.png" width="800" height="38" /></a>
            <% END IF %>        
</div>
			<% for i=1 to 5
				if not wrs.eof then %>
        	<div class="noticias-todas-noticias-arquivos-box-noticias"><a href="index.asp?pagina=noticiasDesc&cod=<%=wrs("cod")%>"><span><%=wrs("data")%></span> - <strong><%=wrs("titulo")%></strong></a></div>
			<% wrs.movenext
				end if
				next%>
      	
      		</div>
		</div>
      <%END IF%>
      </td>
    </tr>
  </table>
<% END IF %>

hargon · Outubro 2, 2010

Segue abaixo a alteração:

<!--#include file="abrir.asp" -->
<link rel="stylesheet" type="text/css" href="css/global.css"/>

        <% wcod= request("txtcat")
                        wsql = "SELECT * FROM tblNoticias WHERE exibir = 'S' AND categoria="&wcod&" ORDER BY cod ASC"
                        SET wrs = wcon.EXECUTE(wsql)
                        IF wrs.BOF THEN
                %>
        Nenhum registro em nossa base de dados para essa categoria
                <% ELSE %>
        
  <table width="800" border="0" cellspacing="0" cellpadding="0">
    <tr>
      <td width="770">
        <% if wrs("categoria") = "5" then %>
            <img src="imagens/titulo_radical.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "1" then %>
                <img src="imagens/titulo_campo.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "2" then %>
            <img src="imagens/titulo_quadra.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "3" then %>
            <img src="imagens/titulo_agua.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "4" then %>
            <img src="imagens/titulo_motor.png" width="800" height="38" />
        <% ELSEIF wrs("categoria") = "6" then %>
            <img src="imagens/titulo_turismo.png" width="800" height="38" />
        <% END IF %>
   
      </td>
    </tr>
    <tr>
      <td valign="top" style="padding-top:10px;">
      <div id="noticiasPage">
      
                <div class="noticiasPageTodas-principal">
                <div class="noticiasPageTodas-principal-titulo"><%=wrs("titulo")%></div>
            <div class="noticiasPageTodas-principal-imagem"><img src="img/noticias/<%=wrs("fotoprin")%>" /></div>
                <div class="noticiasPageTodas-principal-chamada"><a href="index.asp?pagina=noticiasDesc&cod=<%=wrs("cod")%>"><%=wrs("brevedescricao")%> ...[Leia mais]</a></div>        
        </div>
<%
codigoNoticia = wrs("cod")
%>        
        <% If Not wrs.Eof Then
                wrs.MoveNext
                        If Not wrs.Eof Then
                                While Not wrs.Eof
If (len(codigoNoticia) = 0) Then
	codigoNoticia = wrs("cod")
Else
	codigoNoticia = codigoNoticia & ", " & wrs("cod")
End If
								%>
        <div class="noticiasPageTodas-mais-noticias-destaque"><a href="index.asp?pagina=noticiasDesc&cod=<%=wrs("cod")%>">
                <div class="noticiasPageTodas-mais-noticias-destaque-imagem"><img src="img/noticias/<%=wrs("fotomedia")%>" /></div>
            <div class="noticiasPageTodas-mais-noticias-destaque-titulo"><%=wrs("titulo")%></div>
            <div class="noticiasPageTodas-mais-noticias-destaque-leia-mais">[Leia mais]</div></a>
        </div>
                <%                      wrs.MoveNext
                        Wend
                End If
                End If %>
        
      </div>
      <div id="noticiasPageSep"></div>
      
      <div id="noticiasPageTodas-ads"></div>
      
      <div id="noticiasPageSep"></div>
      <div id="noticiasPage">
        <% wcod= request("txtcat")
If (Not isNumeric(codigoNoticia)) Then
codigoNoticia = 0
End If
		
                        wsql = "SELECT TOP 6 * FROM tblNoticias WHERE exibir = 'S' AND categoria="&wcod&" And cod NOT IN(" & codigoNoticia & ") ORDER BY cod ASC"
                        SET wrs = wcon.EXECUTE(wsql)
                        IF wrs.BOF THEN
                %>
        Nenhum registro em nossa base de dados para essa categoria
                <% ELSE %>

          <div class="noticias-todas-noticias-arquivos">
        
            <div class="noticias-todas-noticias-arquivos-titulo">
            <% if wrs("categoria") = "5" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_radical_mais_radical.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "1" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                        <img src="imagens/titulo_campo_mais_campo.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "2" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_quadra_mais_quadra.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "3" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_agua_mais_agua.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "4" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_motor_mais_motor.png" width="800" height="38" /></a>
            <% ELSEIF wrs("categoria") = "6" then %>
                <a href="index.asp?pagina=noticiasArquivo&txtcat=<%=wrs("cod")%>">
                <img src="imagens/titulo_turismo_mais_turismo.png" width="800" height="38" /></a>
            <% END IF %>        
</div>
                        <% for i=1 to 5
                                if not wrs.eof then %>
                <div class="noticias-todas-noticias-arquivos-box-noticias"><a href="index.asp?pagina=noticiasDesc&cod=<%=wrs("cod")%>"><span><%=wrs("data")%></span> - <strong><%=wrs("titulo")%></strong></a></div>
                        <% wrs.movenext
                                end if
                                next%>
        
                </div>
                </div>
      <%END IF%>
      </td>
    </tr>
  </table>
<% END IF %>

betobto · Outubro 2, 2010

aeeeeeeee

MTO obrigado.... pode fechar

Arquivado

[Resolvido] erro '80020009'

Recommended Posts

betobto 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

betobto 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

augustoclaro 2

Compartilhar este post

Link para o post

Compartilhar em outros sites

betobto 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

betobto 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

hargon 64

Compartilhar este post

Link para o post

Compartilhar em outros sites

betobto 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

PHP+Codeigniter - Dúvida referente a PDV

PHP+Codeigniter - Dúvida em Relação a Teclas

Conexão mysql com outro domínio

Fóruns

Tempo Real

Informação importante