Provider error '80004005'

[liam147]

I have an asp page that reads from an Access database and selects a pdf link depending on what the user chooses. It was working fine yesterday. Then I was editing one of the tables and tried to load the asp page while I still had the database open and got an error message.
When I closed the database and tried it again I got:
"Provider error '80004005'
Unspecified error
/filepath.asp, line 25" (sometimes it points to line 11)"

The code is of my asp file is:
*****************************************

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="../../Connections/NewConnection.asp" -->

<%
Dim rsParentChild
Dim rsParentChild_numRows
Set rsParentChild = Server.CreateObject("ADODB.Recordset")
rsParentChild.ActiveConnection = MM_NewConnection_STRING <--This is line 11
rsParentChild.Source = "SELECT * FROM Child"
rsParentChild.CursorType = 0
rsParentChild.CursorLocation = 2
rsParentChild.LockType = 1
rsParentChild.Open()

rsParentChild_numRows = 0
%>
<%
Dim rsParentChild2
Dim rsParentChild2_numRows

Set rsParentChild2 = Server.CreateObject("ADODB.Recordset")
rsParentChild2.ActiveConnection = MM_NewConnection_STRING <--This is line 25
rsParentChild2.Source = "SELECT * FROM Grandchild"
rsParentChild2.CursorType = 0
rsParentChild2.CursorLocation = 2
rsParentChild2.LockType = 1
rsParentChild2.Open()

****************************************

The 'include' file (NewConnection.asp) defines MM_NewConnection_STRING as
****************************************

MM_NewConnection_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("filepath/database.mdb")

*****************************************

From what I've read it's a problem with the MS Access Driver. I've tried loads of things from my end with the database file suggested on this and other forums. My IT manager has checked on IIS that it's running in separate memory space and that the directory has 'shared' and 'web shared' selected privileges, which I had seen as a solution. Still no joy, and the error message is always the same (either line 25 or line 11)
I'm going CRAZY. Any help much appreciated!
Liam.

 

[wvdba]

i have a similar app in access. here's what i use:

DatabaseLocation = "d:\databases\mydatabase.mdb"
set objconn=Server.CreateObject("ADODB.Connection")
     objconn.Provider="Microsoft.Jet.OLEDB.4.0;" 
     objconn.Open DatabaseLocation  
     sqlstring = "SELECT * FROM mytable" 
     Set objRecordset = objconn.Execute(sqlstring) 
objRecordset.MoveFirst
...
your loop for retrieving rows
...