o q tah erradu??

[sodra 0]

o q esta erradu nessi codigu

 

<%sub AbreConexaoconexao.Open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Inetpub\wwwroot\newsletter.mdb;"end subsub FechaConexaoconexao.closeset conexao = nothingend sub%>

tah dandu esse erru aki

 

Erro de tempo de execução do Microsoft VBScript error '800a01a8'

 

Objeto necessário: 'conexao'

 

/conexao.asp, line 3

[John Petrucci 0]

Você tem que passar a conexao por parametros:

 

<%   sub AbreConexao(Conexao)      conexao.Open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Inetpub\wwwroot\newsletter.mdb;"   end sub   sub FechaConexao(Conexao)      conexao.close      set conexao = nothing   end sub%>

Eu tbm uso assim.......bem mais prático.

 

Caso venha a dar novamente o erro de "Conexao Nào encontrada" ou algo do tipo, declare uma variavel com o nome Conexao antes das funções mas nao atribua nenhum valor para ela!!

 

Ateh mais...