Não é estética e sim funcionalidade

[Ted k' 126]

hum... cara eu fiz e deu m*****

<%
If Session("CodigoSESSION") = "" Or Session("CodigoSESSION") = False Then
	Response.Redirect("../Default.asp?ERROR=1")
Else
	Server.Execute("InicioConexao.asp")
%>

 

 

InicioConexao.asp

<%
Set TedkBanco = Server.CreateObject("Adodb.Connection")
	TedkBanco.ConnectionString = "Driver=MySQL ODBC 3.51 Driver;DATABASE=#####;SERVER=######.com.br;UID=######;PASSWORD=#######;"
TedkBanco.Open
%>

 

tem haver o <%%>

[vagner.net 0]

Exatamente oq não deu certo Ted?? Deu algum erro específico??

[Ted k' 126]

cara olha o erro ai

 

 

Tipo de erro:

Objeto Server, ASP 0228 (0x80004005)

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

/multizap.com.br/Gerenciador.Conteudo/bin/RotuloTopo.asp, line 8

 

a linha 8 é essa cara do

 

 

RotuloTopo.asp

<%
If Session("CodigoSESSION") = "" Or Session("CodigoSESSION") = False Then
	Response.Redirect("../Default.asp?ERROR=1")
Else
	Server.Execute("InicioConexao.asp") '''''linha 8
%>

[vagner.net 0]

O nome do arquivo está correto e os dois estão na mesma pasta?

[Ted k' 126]

na verdade está assim cara

 

tem uma página chamda PaginaInicial.asp onde tem um include no topo da página

 

<!--#Include File="../bin/RotuloTopo.asp"-->

 

que é o include anterior mais o RotuloTopo.asp e o InicioConexao.asp estão na mesma pasta

[jrcardozo 4]

server.execute("InicioConexao.asp") você colocou em que página? em RotuloTopo.asp ou em PaginaInicial.asp?se possivel faça o tradicional include de forma que rode e poste aqui como fez

[Ted k' 126]

jonathandj funcionou assim cara

 

RotuloTopo.asp

<%@ Language="VBScript" %>
<% Session.Lcid = 1046 %>
<% Server.ScriptTimeout = 999999999 %>
<%
If Session("CodigoSESSION") = "" Or Session("CodigoSESSION") = False Then
	Response.Redirect("../Default.asp?ERROR=1")
Else
%>
<!--#Include File="InicioConexao.asp"-->

 

mais assim deu erro:

<%@ Language="VBScript" %>
<% Session.Lcid = 1046 %>
<% Server.ScriptTimeout = 999999999 %>
<%
If Session("CodigoSESSION") = "" Or Session("CodigoSESSION") = False Then
	Response.Redirect("../Default.asp?ERROR=1")
Else
	Server.Execute("InicioConexao.asp")
%>

 

erro dado:

Tipo de erro:

Objeto Server, ASP 0228 (0x80004005)

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

/multizap.com.br/Gerenciador.Conteudo/bin/RotuloTopo.asp, line 8

[jrcardozo 4]

cara, esse erro é de caminho ou arquivo não encontrado.este arquivo InicioConexao.asp está dentro da pasta bin?

[Ted k' 126]

está sim cara

 

 

man com Include ele funciona agora com o Server.Execute ñ

[jrcardozo 4]

sinistro cara, realmente não sei

[Ted k' 126]

cara e o server.execute pode puxar uma conexão?

[Ted k' 126]

man eu conseguir coloquei separei uma parte da conexao

 

Set TedkBanco = Server.CreateObject("Adodb.Connection")
	TedkBanco.ConnectionString = "Driver=MySQL ODBC 3.51 Driver;DATABASE=#####;SERVER=######.com.br;UID=######;PASSWORD=#######;"
TedkBanco.Open

 

eparei o TedkBanco.Open e funcionou perfeitamente, muito bom cara!!!!!!

 

valeu pela dica do server.execute, agora vou ajudar meus alunos a fazer inclusão com o server.execute tbm, uma nova opção, brigado jonathandj e vagner.net

[jrcardozo 4]

cara....só confirma uma coisa, veja se usando server.execute ele vai conseguir chamar o objeto de conexão, não me recordo se ele chama o objeto(creio que não)

[Ted k' 126]

cara ele ñ chama o objeto ñ eu tive que separar por isso estava dando erro mais agora conseguir resolver, vlw mesmo cara, irei compartilhar esse aprendizado com a galera que precisa tbm!!!!