[Resolvido] ASP mais Access no Windows 7

[marvi 0]

Olá pessoal,

 

Eu instalei o IIS no Windows 7 e rodou a página em ASP tranquilamente, mas ao usar o Access 2007 no Windows 7 ele não roda e dar esse erro:

 

Microsoft OLE DB Provider for ODBC Drivers erro '80004005' 

[Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado 

/teste/conexao_dados.asp, linha 20

E a linha é:

 

sub abre_conexao

Set Conexao = Server.CreateObject("ADODB.Connection")

Linha 20: Conexao.Open "DBQ=C:\inetpub\wwwroot\testes\bancoanalise.mdb;Driver={Microsoft Access Driver (*.mdb)}"

end sub

 

sub fecha_conexao

Conexao.close

Set Conexao =nothing

end sub

 

Já tentei várias coisas, sou próprio adm do windows e único login, já permiti nas pastas a opção de ler e gravar, o que deve ser? Sei que é problema de drive.

 

Já rodei na internet, mas nada resolvia

 

Desde já, agradeço

 

Marcelo

[xanburzum 169]

usa a conexao assim

 

caminho =Server.MapPath("db/quaddra.accdb")

 

constring="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& caminho &";Persist Security Info=False;"

 

e nao esqueça de dar direitos de escrita,leitra e gravação na pasta e no arquivo...

[marvi 0]

Ok, fiz assim:

 

sub abre_conexao
    Set Conexao = Server.CreateObject("ADODB.Connection")
caminho = Server.MapPath("db/bancoanalise.accdb")
Conexao="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& caminho &";Persist Security Info=False;"

end sub
  
sub fecha_conexao
     Conexao.close
     Set Conexao =nothing
end sub

e deu esse erro:

 

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

 

Objeto necessário: 'Provider=Microsoft.A'

 

/teste/index.asp, linha 9

 

 

A linha é:

 

<!--#include file="conexao_dados.asp"-->

<%

executar= "select * from exames "

 

dim conexao

 

Call abre_conexao

 

Linha 9: Set rsinstrucoes=Conexao.Execute(executar)%>

[xanburzum 169]

sub abreconexao

constring="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& caminho &";Persist Security Info=False;"

Set conexao=Server.CreateObject("ADODB.Connection")

conexao.open constring

end sub

 

[marvi 0]

Ok, fiz isso:

 

sub abre_conexao
caminho = Server.MapPath("bancoanalise.accdb")
Conexao="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& caminho &";Persist Security Info=False;"
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open Conexao

end sub
  
sub fecha_conexao
    ' Conexao.close
     Set Conexao =nothing
end sub

E ele volta ao erro:

 

Microsoft OLE DB Provider for ODBC Drivers erro '80004005'

 

[Microsoft][ODBC Driver Manager] Nome da fonte de dados não encontrado e nenhum driver padrão especificado

 

/teste/conexao_dados.asp, linha 20

 

Linha:

 

sub abre_conexao

caminho = Server.MapPath("bancoanalise.accdb")

Conexao="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="& caminho &";Persist Security Info=False;"

Set conexao=Server.CreateObject("ADODB.Connection")

Linha 20: conexao.open Conexao

 

end sub

 

sub fecha_conexao

' Conexao.close

Set Conexao =nothing

end sub

 

 

Parece que falta algum drive no Windows para esse banco.

[xanburzum 169]

você precisa dar direitos administrativos no arquivo e na pasta

[marvi 0]

Isso eu já fiz antes, mas achei o problema, tive que liberar aplicativos 32 no IIS 7 e não tinha feito isso!

 

Tem um manual simples fazendo isso: http://sharpcode.com.br/blogs/mfalthmann/archive/2009/01/07/dica-resolvendo-problemas-com-vista-64-iis-e-access.aspx

 

Obrigado, agora está funcionando!