Mi connetto con questa stringa su un mdb sulla stessa rete del pc da dove lancio un progetto vb.... ma la lettura e scrittura dei records è lentissima, si può migliorare. grazie.



Option Explicit
Sub APRI_CONNESSIONI_SQL()

Dim strDbPath As String

'CONNESSIONE AL DATABASE - DATABASENAME
Set CNSQL = New ADODB.Connection


strDbPath = "\\XX.XXX.XXX.XX\DIR\DB_PAS_DUE.mdb"
CNSQL.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Persist Security Info=False;" & _
"Data Source=" & strDbPath & _
";"

End Sub