[VB6]adoData e messaggi di avvertenza del DriverManager ODBC

[Tallino]

Ciao ragazzi,
nel mio programma di VB6 uso, per la connessione al DB, una serie di oggetti adoData. Funzionano bene e sono efficenti, unico problema: visto che non setto la connection string dalle proprietà dell'oggetto ma le carico direttamente nell'evento Form_Load() tutte le volte che mando la form in runtime mi appare il messaggio:

[Microsoft][Driver Manager ODBC] Nome origine non trovato e driver predefinito non specificato.

Non è un errore ma solo un'avvertenza, una volta premuto il tasto ok infatti il programma funziona correttamente... xò è moooolto fastidiosa visto che compare ogniqualvolta che carico una form!
Come faccio a disattivarlo?
Grazie sin da ora per la pazienza e la disponibilità
A presto

[Boldan]

Potresti postare la stringa di connessione che utilizzi?

Ciao

[Tallino]

 
'impostazione connessione
percorso = App.Path & "\" & "dati" & "\" & "prog.mdb"
conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & percorso & ";jet oledb:database , , , adAsyncConnect"
Me.adoAtti.ConnectionString = conn
Me.adoAtti.Refresh

Grazie 1000

[Boldan]

Potresti provare a chiudere la connessione e riaprirla anziché lare il refresh:

percorso = App.Path & "\" & "dati" & "\" & "prog.mdb"
conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & percorso & ";jet oledb:database , , , adAsyncConnect"
If Me.adoAtti.State = adStateOpen Then Me.adoAtti.Close 

Me.adoAtti.ConnectionString = conn
Me.adoAtti.Open

Forse il problema è dovuto al 'refresh'.

Ciao

[Tallino]

ho provato ma non funziona...
adoAtti.State &
adoAtti.Open
me li indica come metodi non validi :master:

[Tallino]

ma cmq secondo me il problema non è quello, il messaggio di avvertenza del Manager ODBC rimane.... sparisce soltanto se imposto la connessione dalle proprietà dell oggetto!