Ir para conteúdo

POWERED BY:

Arquivado

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

sublyer

Sistema de banner

Recommended Posts

Bom estou usando 2 sistemas rotativos de banner em meu site, um no canto direito e um na parte superior... o problema é que eles são sistemas que possuem a mesma caracterista pois as suas conexões, banco de dados são diferentes, quando insiro os dois sistemas na página isso me gera um erro deste :

 

Tipo de erro:

(0x80020009)

Exceção.

/banner_88.asp, line 17

 

O code é este abaixo.

 

 

<!--#include virtual="/88/conectar.asp"--><% AbreConexaoSql_88="SELECT * FROM banner"Set RS_88 = Conexao.Execute(Sql_88)Do Until RS_88.EOF or RS_88.BOFValores = Valores & RS_88("ID") & ","RS_88.MovenextLoopArraySplit = Split(Left(Valores,Len(Valores)-1),",")Randomizex_88 = CInt(Rnd()*Ubound(ArraySplit))sID_88 = ArraySplit(x_88)Sql_8="SELECT * FROM banner WHERE id = "&sID_88&""Set rsMostra1 = Conexao.Execute(Sql_8) %><%if rsMostra1("flash")="1" then %><%else%><a href="/servicos/propaganda/banner_88/vai.asp?id=<%=rsMostra1("id")%>&url=<%=rsMostra1("url")%>" target="_blank"><font face="Verdana" size="1"><img src="/servicos/propaganda/banner_88/<%=rsMostra1("banner")%>" border="0"></font></a><%end if%><% Sql1 = "UPDATE banner SET exibicoes = exibicoes + 1 WHERE id = "&rsMostra1("id")&" "Conexao.Execute(Sql1) %>

Quem me ajudar ae eu agradeço

Compartilhar este post


Link para o post
Compartilhar em outros sites

A linha 17 é a linha do if?

 

Se for, o problema é que algum banner cumpre a condição flash=1 e como não existe numa instrução para esse caso, o códigot rava.

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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