5 replies to this topic

[jucabala]

Ae pessoal enviei meus arquivos para o host so que esta dando esse erro,

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0xd1c Thread 0x9c4 DBC 0x1401dc8c Jet'.

/conex.asp, line 5


o arquivo conex.asp esta assim:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSNtest="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtest=dsntest & "DBQ=D:\home5\papoa2.com.br\db\bdpapo.mdb"
Conn.Open DSNtest

A pasta do banco de dados no host esta com nome de "bd" e o meu arquivo "bdpapo.mdb" o dominio é www.papoa2.com.br

[Hudson]

Tenta fazer a string de conexao assim:

<%
	Set cn = Server.CreateObject("ADODB.Connection")
	cnPath = "DBQ=" & server.MapPath("bdpapo.mdb")
	cn.Open = "Driver={Microsoft Access Driver (*.mdb)}; " & cnPath
	Set rs = Server.CreateObject("ADODB.Recordset")
%>

bdpapo.mdb seria no caso o banco de dados. acrescente caminho para ele se precisar, tipo assim: "papoa2.com.br/db/bdpapo.mdb"

Edição feita por: Hudson, 23/04/2005, 21:26.

[LeoB]

http://forum.wmonlin...howtopic=113667

[jucabala]

hudson, tentei esse e ficou assim,

<%
Set cn = Server.CreateObject("ADODB.Connection")
cnPath = "DBQ=D:papoa2.com.br/db/bdpapo.mdb" & server.MapPath("bdpapo.mdb")
cn.Open = "Driver={Microsoft Access Driver (*.mdb)}; " & cnPath
Set rs = Server.CreateObject("ADODB.Recordset")

dim dataatual, datanascimento, n1, n2

quando estava rodando estava assim - D:papoa2.com.br/db/bdpapo.mdb"
ai tentei assim - papoa2.com.br/db/bdpapo.mdb"

nao esta abrindo nenhuma pagina pois a maioria usa o banco de dados.

Voce conhece alguma maneira de descobrir o endereço de banco no host?

[Generation]

Tenta assim ..


<%
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("banco.mdb")
%>

Ps..:: Server.MapPath("bancodedados.mdb") busca o caminho virtual padrão do banco de dados

Flws..

Generation

Edição feita por: Generation, 24/04/2005, 13:46.

[jucabala]

Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bdpapo.mdb")

esse resolveu valeu ae joao paulo!