Erro asp Objeto Server erro 'ASP 0228 : 80004005'

bonatto.cc · Novembro 24, 2011

Bom dia a todos...

Sou novo no fórum, sou desenvolvedor standard de css, html, javascript, flash e etc...

Não entendo nada de programação...

um cliente pediu pra eu alterar o campo de rodapé do site dele, fiz o mesmo, porem alterando só texto a seguinte mensagem apareceu:

___________________________________________________________

Objeto Server erro 'ASP 0228 : 80004005'

Erro de Server.Execute

/index.asp, line 73

Falha da chamada para Server.Execute ao carregar a página.

____________________________________________________________

o código na página dessa linha segue o seguinte:

<%

if page = "" then

server.Execute("home.asp")

else

server.Execute(page)

end if

%>

Ja tentei trocar por includes ou outras formas, mas todas outras páginas do site são dependentes dessa variável...

um abraço

onedev · Novembro 24, 2011

Amigo,

tente o seguinte:

<%If page = "" Then%>

<%Else%>

<%End If%>

Se não der certo você tem que conferir o que tem dentro do home.aso e do page.asp. O erro pode estar dentro deles

bonatto.cc · Novembro 24, 2011

Agora ficou pior, a página ficou em branco aparecendo o seguinte erro:

Páginas do Active Server erro 'ASP 0126'

Arquivo de inclusão não encontrado

/index.asp, line 74

O arquivo de inclusão 'page.asp' não foi encontrado.

fiz um backup dos arquivos antes de alterar, nem local nem no servidor eu tenho esse arquivo page.asp

somente o home.asp o conteudo dele é o seguinte:

<%@ LANGUAGE=VBScript %>
<% Option Explicit %>
<% Response.buffer = true %>
<% Response.Expires = 0 %>
<% Session.LCID = 1036 %>

<%
Dim banco, conexao
Dim rs, mostra, ch_categoria, rs1, mostra1, bg
Dim rs2, mostra2, rs3, mostra3	
Dim conta, conta1
%>

<!--#include virtual="/includes/banco.asp" -->


<%
Conexao.Cursorlocation = 3

Set rs = Server.CreateObject("ADODB.Recordset") 
mostra = "SELECT * from categorias order by ordem "
rs.open mostra, Conexao,3,3 


%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Untitled Document</title>
<link href="/estilos/site.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
.style1 {color: #033663}
-->
</style>
</head>

<body>
<table width="486" border="0" cellpadding="0" cellspacing="0" bgcolor="f3f1f1" class="tabela_481">
 	<!--DWLayoutTable-->
  <tr>
 <%
 		conta  = 0
	conta1 = 2
	Do While not rs.eof
 			if conta = conta1 then
			conta1 = conta1+2
			response.Write("</tr><tr><td colspan=2 heigth=30></td><tr>")
		end if

 %>
  		<td width="240" height="166" align="center" valign="middle" class="titulos_azul">
          	<br />
         		<a href="/index.asp?page=produtos.asp&id=<%=rs("id")%>"><img src="<%=rs("foto")%>" width="214" height="121" border="0" style="border:#003366 solid 1px;" /></a>			
			<br /><br />
			<a href="/index.asp?page=produtos.asp&id=<%=rs("id")%>" class="links_menu"><%=rs("categoria")%></a>
               <br />
			<%if rs("catalogo") <> "" then %>
			<a href="<%=rs("catalogo")%>" target="_blank" class="links_menu">Baixar o Catálogo</a> 
               <%end if%>
		</td>
<%
		conta = conta+1
		rs.movenext
		Loop
%>		

 <tr>
   <td height="30"></td>
   <td></td>
   </tr>
</table>
</body>
</html>
<%
rs.close
conexao.close
SET Conexao = Nothing

%>

Vinicius Ianni · Novembro 24, 2011

Coloque a linha da inclusão logo abaixo da declaração <%@ LANGUAGE=VBScript %>

Se não me engano, os includes devem ser declarados logo no inicio do script.

bonatto.cc · Novembro 24, 2011

Agora piorou de vez...

apareceu o seguinte erro:

Microsoft VBScript runtime erro '800a01a8'

Object required: ''

/home.asp, line 19

código da index que está com erro:

<%@ LANGUAGE=VBScript %>
<% Option Explicit %>
<% Response.buffer = true %>
<% Response.Expires = 0 %>
<% Session.LCID = 1036 %>

<%
Dim banco, conexao, page
Dim mostra, rsesq
%>

<!--#include virtual="/includes/banco.asp" -->


<%

Conexao.Cursorlocation = 3
page = request("page")


Set rsesq = Server.CreateObject("ADODB.Recordset") 
mostra = "SELECT * from categorias order by ordem "
rsesq.open mostra, Conexao,3,3 



%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Silitec:Tubos de Silicone : Perfis de Silicone :  Mangueiras de Silicone : Perfis para Forno : Placas de Silicone : Cordões de Silicone : Indústria de Silicone : Peças de Silicone : Rolhas de Silicone</title>
<link href="estilos/site.css" rel="stylesheet" type="text/css" />
<script language="javascript" src="/js/functions.js"></script>
<script language="javascript">
function Inicializa(){
<% If Request.QueryString("msg") = 1 Then %>
	alert("A Siltec agradece seu contato.");
<% End If %>
}
 -->

</script>
</head>
<body onLoad="Inicializa();" >


<div id="div_carrega" class="some">  Carregando...</div>

<table width="334" border="0" cellpadding="0" cellspacing="0" class="tabelageral" align="center">
<!--DWLayoutTable-->
<tr>
	<td width="800" height="100" valign="top">
		<!--#include virtual="/includes/topo.asp" -->
	</td>
</tr>
<tr>
	<td height="400" valign="top">
		<table width="100%" border="0" cellpadding="0" cellspacing="0" style="background:url(/imagens/fdo_site.gif) repeat-x #05396b" >
		<!--DWLayoutTable-->
			<tr>
				<td width="42" height="400"> </td>
				<td width="719" valign="top">
					<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#f3f1f1" style="background:url(/imagens/fdo_esquerda.jpg) repeat-y;">
					<!--DWLayoutTable-->
						<tr>
						  <td width="223" rowspan="2" valign="top">
							  <!--#include virtual="/includes/esquerda.asp" -->								</td>
							<td width="4" height="19" valign="top"><!--DWLayoutEmptyCell--> </td>
							<td width="481" rowspan="2" valign="top">
								<%
									if page = "" then
										Server.Execute("home.asp")
									else
										Server.Execute(page)
									end if		
								%>								</td>
							<td width="11" valign="top"><!--DWLayoutEmptyCell--> </td>
					    </tr>

						<tr>
						  <td height="430"></td>
							<td valign="top"></td>
						</tr>




						<tr>
						  <td height="53" colspan="4" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" style="background:url(imagens/fdo_rodape.gif) repeat-x;">
								<!--DWLayoutTable-->
									<tr>
										<td width="736" height="53" align="center" valign="middle" class="rodape">
											<p><strong>Silitec Indústria e Comércio de Silicone Ltda.</strong><br />
											  Av. Das Indústrias, nº 1300-Distrituto Industrial Cep : 94930-230 Cachoeirinha – RS - 
											  Fones: (51) 3374-8482  / (51) 3337-4014  <br />
											  Fone/fax: (51)3337-4014 - 
								      E-mail: <a href="silitec@silitec.com.br" class="links_branco">silitec@silitec.com.br</a></p>											</td>
							</tr>
								</table></td>
					  </tr>
					</table>
				</td>
				<td width="39" rowspan="2"><!--DWLayoutEmptyCell--> </td>
			</tr>
		</table>
	</td>
</tr>
</table>
<map name="Map" id="Map">
<area shape="rect" coords="93,243,174,263" href="/index.asp" />
<area shape="rect" coords="220,242,281,261" href="/index.asp?page=paginas.asp&ch_pagina=4" />
<area shape="rect" coords="332,244,448,263" href="/index.asp?page=paginas.asp&ch_pagina=5" />
<area shape="rect" coords="495,245,571,263" href="/index.asp?page=falecom.asp" />
<area shape="rect" coords="628,244,694,263" href="/index.asp?page=localizacao.asp" />
</map>
<map name="Map_menu" id="Map"><area shape="rect" coords="44,3,138,25" href="/index.asp?page=produtos.asp&ch_categoria=7" /><area shape="rect" coords="43,44,136,61" href="/index.asp?page=produtos.asp&ch_categoria=8" /><area shape="rect" coords="46,75,137,99" href="/index.asp?page=produtos.asp&ch_categoria=6" />
<area shape="rect" coords="46,117,137,136" href="/index.asp?page=produtos.asp&ch_categoria=9" />
</map>
<script type="text/javascript">
var gaJsHost = (("https:" == document.location.protocol) ? "https://ssl." : "http://www.");
document.write(unescape("%3Cscript src='" + gaJsHost + "google-analytics.com/ga.js' type='text/javascript'%3E%3C/script%3E"));
</script>
<script type="text/javascript">
try {
var pageTracker = _gat._getTracker("UA-7085992-1");
pageTracker._trackPageview();
} catch(err) {}</script>
</body>
</html>
<%
Set Conexao = Nothing
%>

xanburzum · Novembro 24, 2011

Verifique a URL que você está passando para a transferência ou método execute. Certifique-se que é uma URL relativa, e que você pode batê-lo com um browser. dá um Response.Write na Server.MapPath sobre o valor que você está passando, e certifique-se que ela produz um caminho local válido.

MarKteus · Dezembro 6, 2011

tente fazer o seguinte:

Server.Execute(" + page + ")

Att.

Daniel1 · Dezembro 18, 2011

O erro parece que é nesse page=request("page"), sabendo que o objeto request pode ser tanto .querystring quanto .form então ele irá retornar um valor string sendo que a função server.execute exceuta uma página asp, então você NÃO deve dar na variavel page um request("page") a não ser que a string retornada dessa variável seja assim "pagina.asp" se só for um nome qualquer como "página" sem extensão dará o erro.

Espero ajudar.

xanburzum · Dezembro 18, 2011

dá um Response.Write na variavel para ver o que esta sendo passado de valor

Arquivado

Erro asp Objeto Server erro 'ASP 0228 : 80004005'

Recommended Posts

bonatto.cc 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

onedev 2

Compartilhar este post

Link para o post

Compartilhar em outros sites

bonatto.cc 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Vinicius Ianni 189

Compartilhar este post

Link para o post

Compartilhar em outros sites

bonatto.cc 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

MarKteus 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

Daniel1 1

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

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

Conexão mysql com outro domínio

[Resolvido] JavaScript - Exibir logo dentro da Tabela html

Fóruns

Tempo Real

Informação importante