error 80004005

[Christophe Cerbourg]

hi,

in an ASP page, I coonect to a MSACCESS database and the first load of the
page is correct but, when I immediately refresh the same page, I get an
80004005 error...

Thanks for any idea...

Here is the code :
Set Conn = Server.CreateObject("ADODB.Connection")
str = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(".")
&"\Ficli_data.mdb"
Conn.Open str

Set rs2 = Server.CreateObject("ADODB.Recordset")
SQL1 = "select * from TSites order by nom_int"
rs2.Open SQL1, Conn
continuer = 1
nb = 0
do while ((not rs2.eof) And (nb <= nbrep))
nb = nb + 1
if (nb=1) then response.write("<b>")
response.write("<br>" & rs2("toto"))
if (nb=1) then response.write("</b>")
rs2.movenext
Loop
rs2.close
set rs2=nothing

Conn.close
set Conn=nothing

 

[Ray at]

As most people probably do not have the error description memorized for each
error number, it's generally best to include the actual error message when
posting. Also indicate the line on which the error occurs. But here are
the most common causes for an 80004005 error.
http://www.aspfaq.com/show.asp?id=2009


Ray at home

 

[Christophe Cerbourg]

sorry for I didn't give you enough informations.

The exact message is :
Provider (0x80004005)
Erreur non spécifiée (which means "not specified error"
/test/fdcli.asp, line 24 (the line of the CONNECT statement)

also thanks for the FAQ but I've already check the permissions of IUSR... on
the folder, the database is on my computer for test and I'm the only user.

What I wonder is why it works the first time, then not work again if I
refresh the page, then works again after about one minute ???

Thanks for any help

 

[Bob Barrows]

hi,

in an ASP page, I coonect to a MSACCESS database and the first load
of the page is correct but, when I immediately refresh the same page,
I get an 80004005 error...

Thanks for any idea...

Here is the code :
Set Conn = Server.CreateObject("ADODB.Connection")
str = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" &
Server.MapPath(".") &"\Ficli_data.mdb"
Conn.Open str

Set rs2 = Server.CreateObject("ADODB.Recordset")
SQL1 = "select * from TSites order by nom_int"
rs2.Open SQL1, Conn
continuer = 1
nb = 0
do while ((not rs2.eof) And (nb <= nbrep))
nb = nb + 1
if (nb=1) then response.write("<b>")
response.write("<br>" & rs2("toto"))
if (nb=1) then response.write("</b>")
rs2.movenext
Loop
rs2.close
set rs2=nothing

Conn.close
set Conn=nothing

Since you say you have already verified IUSR permissions to the folder
containing the database, I suggest you switch to the native Jet OLEDB
Provider instead of using the obsolete ODBC driver:

str = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
Data Source=" & Server.MapPath(".\Ficli_data.mdb")

HTH,
Bob Barrows

 

[Christophe Cerbourg]

thanks Bob for answering.
Is this driver already installed or should I look for it somewhere ?
If so, thanks for any link.

 

[Bob Barrows]

thanks Bob for answering.
Is this driver already installed or should I look for it somewhere ?
If so, thanks for any link.

Yes, it is installed as part of the MDAC installation. If it fails on you,
go to www.microsoft.com/data and get the separate Jet engine download.

Bob Barrows