tdf.connect ..

[SiJP]

Tryng to acheive a very simple task here.

Within an access database, I have a user specify the name of a target database, the location of the security file and a username/password of an account that has read/write permissions.

I then use this information to link tables, contained within an array.

'// Link all necessary tables from the specified Jet DB to this local DB
    For i = 1 To UBound(arrTables)
        Set tdf = CurrentDb.CreateTableDef("JETBB_" & "strTableName")
            tdf.Connect = "Provider=Microsoft.Jet.OLEDB.3.0;Data Source=" & strJetDB & ";Jet OLEDB:System Database=" & strJetSec
            tdf.SourceTableName = arrTables(i)
            CurrentDb.TableDefs.Append tdf
    Next i
   
   CurrentDb.TableDefs.Refresh

[code]

However, I get the error "3170 Couldn't find an installable ISAM".  A quick search on this error shows that when exporting to files other than Access this may occur if you have corrupt registry entries or dll issues, and reinstalling Access should work.

From the above, I'm using Access 97 to connect to an Access 97 DB.  

I have also tried the Connection string as:             tdf.Connect = "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & strJetDB & ";SystemDB=" & strJetSec

.. this produces the same error.. 

any help would be appreciated!

------------------------
Hit any User to continue

 

[EBGreen]

Have you tried reinstalling Access?

[red]"... isn't sanity really just a one trick pony anyway?! I mean, all you get is one trick, rational thinking, but when you are good and crazy, oooh, oooh, oooh, the sky is the limit!" - The Tick[/red]

 

[SiJP]

Nope!

Ended up using another connection string, so no need!

------------------------
Hit any User to continue

 

[DanielGreenwood]

Hi SiJP

Could you give me the string you ended up using?

Having the same problem and I'm sure its only the string thats wrong.

Thanks

D