>I am trying to connect to Access 97 database using ADO with Microsoft
>Jet 3.51 OLE DB Provider but I get an error that the "Test Connection
>failed because of an error in intializing provider. Can't open a
>database created with a previous version of your application.". However
>if convert the database into Access 2000 I can open it. Is there some
>other OLE DB drivers I need to get for Access 97 files.
>Any help will be appreciated.

>Thanks

>Raj

> Here is the code that I used to connect to ACCESS97 via ADO and all works
> fine.

> I have this code in a class named CLOGIN

> ------------

> '----------------------------------------------------------------------
> ' Module Name:  CLOGIN
> ' Author:       Clint M. LaFever

> '
> ' Description:  CLOGIN Class - Interface to log into database using
> '                   ADO 2.0
> '
> '----------------------------------------------------------------------
> Option Explicit
> Public DataBaseName As String
> Public ServerName As String
> Public UserName As String
> Public Password As String
> Public cn As ADODB.Connection
> Public Enum DATABASE_TYPES
>     SQL_SERVER = 0
>     MS_ACCESS97 = 1
> End Enum
> Public Function ConnectRemote(Optional dbTYPE As DATABASE_TYPES = 0) As
> Boolean
> On Error GoTo ConnectRemote_Error
>     Dim sConnect As String
>     If dbTYPE = SQL_SERVER Then
>         sConnect = "DRIVER={SQL Server};SERVER=" & Me.ServerName _
>             & ";UID=" & Me.UserName & ";PWD=" & Me.Password & ";DATABASE=" &
> Me.DataBaseName & ";"
>     Else
>         sConnect = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" &
> Me.DataBaseName & ";"
>     End If
>     Set cn = New ADODB.Connection
>     cn.Open sConnect
>     If cn.State = adStateOpen Then
>         ConnectRemote = True
>     Else
>         ConnectRemote = False
>     End If
>     Call SaveSetting(App.Title, "Startup", "ConnectionVersion", cn.Version)
>     Call SaveSetting(App.Title, "Startup", "LastConnected", Now)
>     ConnectRemote = True
> ConnectRemote_Exit:
>     Exit Function
> ConnectRemote_Error:
>     Call SaveSetting(App.Title, "StartUp", "LastError", Err & ":" &
> Err.Description)
>     ConnectRemote = False
>     Resume ConnectRemote_Exit
> End Function

> --------------

> ------------------------------------------
> Clint M. LaFever
> Lead Software Engineer
> SAIC Decision Support Division
> 1235 Jefferson Davis Hwy, Suite 411
> Arlington, VA 22202
> 703-413-8991 (wk)
> 703-413-6058 (fax)

> http://www.saic.com

> ------------------------------------------

> >I am trying to connect to Access 97 database using ADO with Microsoft
> >Jet 3.51 OLE DB Provider but I get an error that the "Test Connection
> >failed because of an error in intializing provider. Can't open a
> >database created with a previous version of your application.". However
> >if convert the database into Access 2000 I can open it. Is there some
> >other OLE DB drivers I need to get for Access 97 files.
> >Any help will be appreciated.

> >Thanks

> >Raj

>I am trying to connect to Access 97 database using ADO with Microsoft
>Jet 3.51 OLE DB Provider but I get an error that the "Test Connection
>failed because of an error in intializing provider. Can't open a
>database created with a previous version of your application.". However
>if convert the database into Access 2000 I can open it. Is there some
>other OLE DB drivers I need to get for Access 97 files.
>Any help will be appreciated.

>Thanks

>Raj

> Hi Clint,
> Thanks for the Info. It shall help. My only problem is that it is
secured access
> database. I am not sure if it makes a difference. I used the same
connection
> string. But also had the System, UserId and Password. So I am not sure
if the
> System.mdw is creating the problem. My driver was also oledb.3.51. I
will try to
> connect with OLE.DB to an un secured database and see if it works.

> Thanks again for the info.

> Raj

> Raj,

> If your database has security, you will need to let the provider know the
> location of your workgroup information file. Add the following to your
> connection string:

>     Jet OLEDB:System database=C:\data\mysytem.mdw"

> or set the connection property like this Microsoft sample:

>    Dim cnn As New ADODB.Connection
>    cnn.Provider = "Microsoft.Jet.OLEDB.4.0;"
>    cnn.Properties("Jet OLEDB:System database") = _
>       "C:\Program Files\Microsoft Office\Office\SYSTEM.MDW"
>    cnn.Open "Data Source=.\NorthWind.mdb;User Id=Admin;Password=;"

> Good Luck,
> Roy

> > Hi Clint,
> > Thanks for the Info. It shall help. My only problem is that it is
> secured access
> > database. I am not sure if it makes a difference. I used the same
> connection
> > string. But also had the System, UserId and Password. So I am not sure
> if the
> > System.mdw is creating the problem. My driver was also oledb.3.51. I
> will try to
> > connect with OLE.DB to an un secured database and see if it works.

> > Thanks again for the info.

> > Raj

> ------------------  Posted via CNET Help.com  ------------------
>                       http://www.help.com/