Pessoal, bom dia
Estou usando VB6 , CR10 e Access 2003.
Preciso abrir um relatório no VB acessando um banco de dados ACCESS com senha.
Abaixo segue o código que estou usando, está funcionando perfeitamente, só que com a senha não abre e eu só preciso incluir a opção da senha.
Set n_relatorio = n_aplicacao.OpenReport(arquivo)
Set n_banco = n_relatorio.Database
Set n_tabelas = n_banco.Tables
For x = 1 To n_tabelas.Count
Set n_tabela = n_tabelas.Item(x)
Next
n_tabela.Location = App.Path & "anco.mdb"
n_relatorio.DiscardSavedData
CR1.ReportSource = n_relatorio