Ir para conteúdo

Arquivado

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

godoy89

[Resolvido] Microsoft VBScript runtime error '800a01a8'

Recommended Posts

Microsoft VBScript runtime error '800a01a8'

 

Object required

 

/novo_site/in/inc_noticias.asp, line 4

 

 

<%
'Resgata as notícias publicadas'
sqlNews = "SELECT TOP 1 * FROM tabNews ORDER BY data DESC"
set rsNews = conn.execute(sqlNews)
if(not rsNews.eof)Then
%>

<%
	while not rsNews.eof
		varTit = rsNews("titulo")
		varLinha1 = rsNews("obs")
		varMateria = rsNews("materia")
		varRef = rsNews("referencia")

		'Trata as variáveis necessárias'
		if(not isNull(varTit) AND varTit <> "")Then
			varTit = replace(varTit,"<aspa>","'")
		end if
		if(not isNull(varLinha1) AND varLinha1 <> "")Then
			varLinha1 = replace(varLinha1,"<aspa>","'")
		end if
		if(not isNull(varMateria) AND varMateria <> "")Then
			varMateria = replace(varMateria,"<aspa>","'")
		end if
%>

<a href="noticias.asp?id=<%=varRef%>" style="color:#004C8D;font-weight:bold;"><%=varTit%></a><br>
<%=varLinha1%><br> 

<%
	rsNews.movenext
	wend
%>

<%
end if
set rsNews = Nothing
%>

O engraçado eh que eu tenho esse código em outra página e ele funciona perfeitamente. O que eu to fazendo errado?

Compartilhar este post


Link para o post
Compartilhar em outros sites

(1) <%

(2) 'Resgata as notícias publicadas'

(3) sqlNews = "SELECT TOP 1 * FROM tabNews ORDER BY data DESC"

(4) set rsNews = conn.execute(sqlNews)

(5) if(not rsNews.eof)Then

(6) %>

 

Só contar :P

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu tenho a index.asp que dentro dela há os includes:

openLogger (cria a conexão)

noticias.asp (código que eu postei)

closeLogger (fecha a conexão)

 

O include da conexão, é o mesmo utilizado para todo o restante do site, e funciona normalmente.

(mas eu tinha esquecido de colocar na index.asp)

 

Agora que coloquei, deu o seguinte erro:

 

Microsoft VBScript compilation error '800a0411'

 

Name redefined

 

/novo_site/in/inc_openLogger.asp, line 2

 

Dim Conn

----^

 

 

 

E agora?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Dim Conn

 

 

 

Mas como eu disse nos posts anteriores, eu usava esse include no site anterior e até no atual, em outras páginas...

Compartilhar este post


Link para o post
Compartilhar em outros sites

será que você não tem outro code em cima das notícias utilizando e não fechando o conn??? verifique também o nome da tabela especificado no select

Compartilhar este post


Link para o post
Compartilhar em outros sites

será que você não tem outro code em cima das notícias utilizando e não fechando o conn??? verifique também o nome da tabela especificado no select

Tem um outro include na index, o indices.asp (que dentro tem o oppen e o closeLogger)

 

No momento tá assim:

 

index.asp:

<oppenLogger>

~~~~~~

~~~~~~

include (indices.asp <oppenLogger> <closeLogger>)

~~~~~~

~~~~~~

include (noticias.asp)

<closeLogger>

 

(deu pra entender?)

 

Será isso? :unsure:

Compartilhar este post


Link para o post
Compartilhar em outros sites

faz o teste em retirar eles, mais nao pode haver duas variaveis iguais sendo dimensionadas

Deixar oppen e closeLogger só na home?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Só deixei o oppen e o closeLogger na index e funcionou perfeitamente.

 

Obrigado Ted e Patrique!

 

 

-Resolvido-

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.