Banco de dados Access com senha

[Jefferson Saavedra 0]

No momento encontro a seguinte dificuldade: quero construir uma consulta que acessa uma tabela em banco de dados externo com senha, para ser mais preciso. O banco contém informações escolares, sendo que em um banco chamado ACS02.MDB, que entre outras tabelas eu tenho o cadastro de Alunos, e o banco no qual quero criar a consulta (ACS01.MDB) possui a tabela Vagas. Quero criar a seguinte consulta:

SELECT * FROM Aluno IN 'acs02.mdb' RIGHT JOIN Vaga ON Alunos.[Matrícula] = Vaga.[Matrícula];

 

a questão é: como fazer para informar a senha do banco ACS02 nessa consulta que será criada no ACS01.

 

Desde já deixo meu agradecimento.

[Alex9999 0]

Jefferson:

 

Primeiro declare as variáveis:

Public massa  As Workspace
Public Banco As Database
Public reg As Recordset
public strSql as String

Depois faça as referidas instâncias:

 

Exemplo:

Set massa = Workspaces(0)
Set Banco = massa.OpenDatabase(App.Path & "\ACS01.MDB", False, False, ";pwd=batata")
strSql = "Select * from Produto where iproduto=" 123
Set reg = Banco.OpenRecordset(strSql)

Espero ter ajudado.

 

Obs.: Use app.path, caso o .mdb esteja no mesmo diretório, senão escreva o caminho.

Olha o pwd da senha.

 

"Existem 10 tipos de humanos nesse mundo, aqueles que entendem de números binários e aqueles que não entendem!"