Gostaria de um auxilio, não tenho muito conhecimento mas não consigo fazer algo que parece simples que é uma conexão no meu próprio banco de dados, segue as instruções abaixo:
Dim sql As String
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim i As Integer
Set cn = New ADODB.Connection
'cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\rodri\OneDrive\Área de Trabalho\bd teste\DBLogistica.accdb"
endereçoBD = "C:\Users\rodri\OneDrive\Área de Trabalho\bd teste\DBLogistica.accdb"
cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\rodri\OneDrive\Área de Trabalho\bd teste\DBLogistica.accdb; Persist Security Info=False;"
cn.Open
toda vez da o erro que o banco de dados não pode ser aberto ou bloqueado.
Dim sql As String
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim i As Integer
Set cn = New ADODB.Connection
'cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\rodri\OneDrive\Área de Trabalho\bd teste\DBLogistica.accdb"
endereçoBD = "C:\Users\rodri\OneDrive\Área de Trabalho\bd teste\DBLogistica.accdb"
cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\rodri\OneDrive\Área de Trabalho\bd teste\DBLogistica.accdb; Persist Security Info=False;"
cn.Open
toda vez da o erro que o banco de dados não pode ser aberto ou bloqueado.