[Resolvido]Acessar banco de dados em Access com senha

Caros amigos muito boa tarde.
Estou desenvolvendo um projeto para um cliente, e praticamente quase finalizado.
Porém, para maior segurança do banco de dados, eu coloquei uma senha, mais nao consigo fazer a conexao com esse banco, estou usando o seguinte código:

Path = App.Path & "\banco.accdb"
   db.Open "Provider=microsoft.ace.oledb.12.0;data source=" & Path & ";ace oledb:database Password=123;"

usando usando uma conexão com ACE, porque meu banco de dados em access está usando algumas tabelas com cálculos então tive que criar em ACCDB.
e esta dando o seguinte erro


Se alguem puder me dar uma dica.

Obrigado desde já.

consegui solucionar o erro que aparece na imagem, porém agora da um erro na senha, mais a senha esta correta

Path = App.Path & "\banco.accdb"
db.Open "Provider=microsoft.ace.oledb.12.0;data source=" & Path & ";jet oledb:database Password=10102020;"



rs.Open "select * from Caixa where DataAtual like'" & txt_Filtro_Data_Atual.Text & "%'", db, 3, 3

Do Until rs.EOF
Set Item = lstLancamentos.ListItems.Add(, , rs!Codigo)
Item.SubItems(1) = "" & rs!Tipo
Item.SubItems(2) = "" & rs!DataAtual
Item.SubItems(3) = "" & rs!Descricao
Item.SubItems(4) = "" & Format(rs!valor, "currency")




rs.MoveNext
Loop

rs.Close: Set rs = Nothing
db.Close: Set db = Nothing

a linha que esta marcada de vermelho é onde marca o erro no VISUAL BASIC.

Olá Daniel,

O "%" não funciona no Access.

Substitua o % pelo *, conforme abaixo:

Código:



rs.Open "select * from Caixa where DataAtual like'" & txt_Filtro_Data_Atual.Text & "*'", Db, 3, 3



Boa sorte

[]'s

Obg pela ajuda, consegui resolver