[VB6] aprire database access 97 e 2000

[webgip]

Salve a tutti..
Io ho un programma che accede ad un DB in access 97 sia tramite oggetti data che tramite il DAO 3.51

Per capirci meglio per il DAO intendo una cosa del tipo:

Dim db As Database
Dim rs As Recordset
Dim sqlstring As String

Set db = OpenDatabase("c:\pietro.mdb")
sqlstring = "SELECT * FROM ordineGenerali"
Set rs = db.OpenRecordset(sqlstring)
...
rs.close
db.close

Ora vorrei convertire il mio database in access 2000 e far funzionare il programma senza dover apportare troppe modifiche...

per fare ciò basta semplicemente cambiare la riga
Set db = OpenDatabase("c:\pietro.mdb")
con:
Set db = OpenDatabase(DBName, , , "Access 2000")
??

Perchè avevo già provato con
Set db = OpenDatabase(DBName, , , "Paradox 4.x")
(chiaramente dovevo aprire un DB Paradox..)
però non funzionava...

grazie a tutti!

[webgip]

Ho provato e confermo che nel modo illustrato NON riesco ad accedere ad un database access 2000, bensì apre sempre il 97..

qualcuno sa come posso fare??

[FRANCESCA_MRC]

Io per Access 2000 uso dao 3.6

[webgip]

spiegami meglio..

cioè tu includi il componente microsoft dao 3.6 o giu di li,
e poi come accedi al database, come leggi i campi??

ps: come faccio a trovare il dao 3.6??

[webgip]

se poio farmi un minuscolo esempio con due o tre righe di codice..

[FRANCESCA_MRC]

basta che tra i riferimenti indichi dao3.6
il codice resta quello che hai già scritto...

dim db as database
dim rc as recordset

set db=opendatabase(c:\db.mdb") 'database access2000
set rec=db.openrecordst(tabella) 'senza query