Não consigo conexão com access

[Homero Cardoso da Costa Jr 0]

Bom dia:

 

Estou há alguns dias com o mesmo problema e preciso de uma luz.

 

Já instalei 3 portais ASP no meu IIS, que dão erro na conexão com BD Access, já concedi permissoes de controle total no diretório e arquivo do BD para todos os usuários, inclusive na pasta TEMP e nada, a string de conexão sempre aponta para o lugar certo da bd e mesmo assim está difícil conseguir a conexão com a BD Access. Espero uma luz no fim do túnel porque uma simples conexão com BD não deve ter tantos pormenores. Eis um pedaço do meu script

 

Dim strConn, strLogin, strPassword
'strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("ua_portal.mdb") & ";Persist Security Info=False"
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\inetpub\wwwroot\portal\ua_portal.mdb;Persist Security Info=False"
strLogin = "Admin"
strPassword = ""
'-------------------------------
' Open the connection
'-------------------------------
cn.open strConn, strLogin, strPassword

E o erro é o seguinte:

 

Microsoft JET Database Engine erro '80004005'

 

Erro não especificado

Atenciosamente

Homero Cardoso

[reinaldo polato 1]

e ai Homero beleza

 

http://forum.imasters.com.br/index.php?/topic/174028-microsoft-jet-database-engine-error-80004005/

Nesse link tem o que voce precisa

ve se te ajuda ai

[Patrique 0]

Parece permissão mesmo.

[xanburzum 169]

verifique novamente as permissoes dá uma verificada nesse guia para ver se ajuda e tente assim

um arquivo chamado conexao.asp dentro de C:\Inetpub\wwwroot\conn e seu bd dentro de C:\Inetpub\wwwroot\bd

 

conexao.asp

<% 
sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/seu_banco.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

e chma atraves de include na pagina

[Homero Cardoso da Costa Jr 0]

verifique novamente as permissoes dá uma verificada nesse guia para ver se ajuda e tente assim

um arquivo chamado conexao.asp dentro de C:\Inetpub\wwwroot\conn e seu bd dentro de C:\Inetpub\wwwroot\bd

 

conexao.asp

<% 
sub abreconexao
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/seu_banco.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
conexao.open constring
end sub

sub fechaconexao
set conexao=nothing
end sub
%>

e chma atraves de include na pagina

 

OK vou tentar os prcedimentos e respondo o mais rápido possível

[xanburzum 169]

lembrando , depois você usa assim na pagina onde fará a conexao

 

'crio a conexao%>
 <!--#include file="conn/conexao1.asp"--> 
<% call abreconexao
			
  'crio o rs
  set rs=Server.CreateObject("ADODB.Recordset")
  'crio o SQL
  SQL="SELECT * FROM login Where codigo between "&var1&" AND "&var2&""
  rs.open SQL,conexao,1,3
   %>