[VB6] Errore di runtime "Impossibile trovare il file (Sconosciuto)"

[gcadmin]

Salve a tutti
Spero che ci sia qualcuno che mi possa aiutare.

Sto scrivendo un applicazione in vba(versione 6.0) per la gestione di una rubrica. In tale aplicazione ho scritto un modulo che prevede le seguenti istruzioni:
'Inizializzazione della connessione al database
Set conn = New ADODB.Connection

'Inizializzaione del recordset di tipo ADODB (Access)
Set rec_set = New ADODB.Recordset

'Inizializzaione del percorso del database
db = "rubrica.mdb"

'Apertura della connessione al database
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=db"

Quando vado ad eseguire il tutto mi ritorna l'errore :
Errore di run-time '-2147467259 ( 80004005 )
[Microsoft][Driver ODBC Microsoft Access]Impossibile trovare il file "(Sconosciuto)".

Tenete presente che ho installato il service pack 5 per vba 6

Cosa mi consigliate di fare?

[alka]

Il linguaggio va indicato nel titolo, come da Regolamento, assieme ad una descrizione significativa del problema.

Questo l'ho corretto io.

[gcadmin]

Grazie per la dritta relativa al Regolamento

[814(k m49!(]

se il file del database e' nella stessa dir del programma devi cambiare

db = "rubrica.mdb"

con

db = App.Path & "\rubrica.mdb"

il problema e' che non trova il database, perche' gli dai un indirizzo errato.

[gcadmin]

Ho provato a seguire il cambiamento ma ritorna sempre lo stesso errore

[814(k m49!(]

puoi postare la directory del tuo programma e quella del database ?

[gcadmin]

OK
La directory è la stessa sia per l'applicazione che per il database

C:\Documents and Settings\gcadmin\Desktop\prove\rubrica

[814(k m49!(]

Allora e' giusto come ti ho detto io.
Prova a guardare che il percorso corrisponda con un msgbox

[gcadmin]

Fatto ma nulla di nuovo

[tekanet]

Prova con OLEDB invece di ODBC;

Qualcosa tipo

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mydatabase.mdb;User Id=admin;Password=;

HTH, tK