
Dim strConn As String Dim cn As ADODB.Connection Dim strSQL As String Set cn = New ADODB.Connection strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:prova.accdb;" cn.ConnectionString = strConn cn.Open |
strConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:prova.accdb;" |
