Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Provider OLEDB ADO che sfortuna

417 views
Skip to first unread message

Andrea Sabatini

unread,
Dec 17, 2000, 8:31:32 AM12/17/00
to
Di nuovo un saluto,
ho sciritto queste 4 righe di codice su una form vuota che si connette
all'avvio ad un DB access 97 utilizzando ADO 2.5:

Private Sub Form_Load()
Set cn = New ADODB.Connection
cn.Provider = "Microsoft.Jet.OLEDB.3.51"
cn.ConnectionString = "c:\prova\prova.mdb"
cn.Open
End Sub
Cerco di farlo funzionare su un altro PC dove c'è WIN 98 + DCOM 98 +MDAC 2.5
e mi retituisce questo errore:
Errore di runtime 3706- Impossibile trovare il provider.E' possibile che non
sia installato correttamente.

Eppure se lo compilo e lo eseguo sullo stessto PC ove c'è VB6...funziona.
Chi mi sa dare una mano?
Grazie
ANdrea


Zanna

unread,
Dec 17, 2000, 9:36:36 AM12/17/00
to

Andrea Sabatini ha scritto nel messaggio ...

>Di nuovo un saluto,
>ho sciritto queste 4 righe di codice su una form vuota che si connette
>all'avvio ad un DB access 97 utilizzando ADO 2.5:
>
>Private Sub Form_Load()
> Set cn = New ADODB.Connection
> cn.Provider = "Microsoft.Jet.OLEDB.3.51"
> cn.ConnectionString = "c:\prova\prova.mdb"
> cn.Open
>End Sub
>Cerco di farlo funzionare su un altro PC dove c'è WIN 98 + DCOM 98 +MDAC
2.5
>e mi retituisce questo errore:
>Errore di runtime 3706- Impossibile trovare il provider.E' possibile che
non
>sia installato correttamente.


Allora, visto che le stai provando tutte prova anche questa:

' se non si ha mdac 2.1+ usare Jet.OLEDB.3.6
CS = "Provider=Microsoft.Jet.OLEDB.4.0;"
CS = CS & "Persist Security Info=False;"
CS = CS & "Mode=ReadWrite;"
CS = CS & "Data Source=" & DataBaseName
Connection.ConnectionString = CS

Non credo risolva niente ma tentar non nuoce.

Ciao


Andrea Sabatini

unread,
Dec 17, 2000, 12:38:37 PM12/17/00
to

> Allora, visto che le stai provando tutte prova anche questa:
>
> ' se non si ha mdac 2.1+ usare Jet.OLEDB.3.6
> CS = "Provider=Microsoft.Jet.OLEDB.4.0;"
> CS = CS & "Persist Security Info=False;"
> CS = CS & "Mode=ReadWrite;"
> CS = CS & "Data Source=" & DataBaseName
> Connection.ConnectionString = CS
>
> Non credo risolva niente ma tentar non nuoce.
>
> Ciao
>

Eh eh eh eh............invece FUNZIONA!!!!
Ti ringrazio tantissimo, hai risolto un problema per me irrisolvibile. Solo
una cosa in questo modo sono costretto a dichiarare la stringa di
connessione per ogni
Private Sub, non c'è altro modo? Non che sia fondamentale perchè FUNZIONA!!
Grazie
Ciao
Andrea


Zanna

unread,
Dec 17, 2000, 2:41:00 PM12/17/00
to

Andrea Sabatini ha scritto nel messaggio ...

>Eh eh eh eh............invece FUNZIONA!!!!


>Ti ringrazio tantissimo, hai risolto un problema per me irrisolvibile. Solo
>una cosa in questo modo sono costretto a dichiarare la stringa di
>connessione per ogni

> Private Sub, non c'č altro modo? Non che sia fondamentale perchč
FUNZIONA!!


Boh! Le vie di windows sono infinite... :(

Dichiara la stringa come costante in un modulo pubblico (se non varia mai).

Ciao


0 new messages