Abrir aplicação access 2007 com VBA

Viva
Utilizo este código para abrir uma base de dados access com senha e funciona.
Acontece que tive necessidade de ter o access 2007 e 2010 no meu PC.
Pretendo que este código abra a base de dados com o 2007 mas assume sempre o 2010, tem como contornar isso?


Function OpenAccess(SelBd As String)

Dim LPath As String
Dim LCategoryID As Long

Dim oApp As Object

LPath = CurrentProject.Path & SelBd
Set oApp = CreateObject("Access.Application")

oApp.OpenCurrentDatabase LPath, False, "senha"
oApp.visible = True
oApp.UserControl = True
Application.Quit

End Function

Obrigado pelas dicas Avelino
Set oApp = CreateObject("Access.Application.12")
Esta opção dá erro:
Run-time error '429'
Activex component can`t create object

A alternativa do sell:
Como eu aplico com VBA uma vez que a aplicação que pretendo abrir tem senha?

Viva Avelino
Como a base de dados aonde faço alterações tem senha e não a tento decorar porque é extensa e com múltiplos caracteres, utilizo um ficheiro à parte para a abrir conforme código exposto neste tópico.
Como está predefinido o 2007 está a acontecer o seguinte:
O primeiro ficheiro abre no 2007 e ao abrir a base de dados começa a configurar o Office para utilizar o 2010, e eu pretendo é continuar a trabalhar no 2007.
Esta situação não se torna pratica para eu fazer alterações

Olá a todos, desculpem a intromissão.

A minha recomendação é ter na máquina de desenvolvimento apenas a versão 2007 com os respetivos ServicePacks.
Ao distribuir a aplicação (normalmente accde) tanto funciona em 2007 como em 2010 ou 2013.
O código que utilizo para ligar tabelas com password é o seguinte:

Código:


Private Sub Comando0_Click()
 Dim dbs As DAO.Database
 Set dbs = DBEngine.OpenDatabase("C:\LigarDB2007pwd\dados.accdb", False, False, ";pwd=1234")
 DoCmd.TransferDatabase acLink, "Microsoft Access", _
    "C:\LigarDB2007pwd\dados.accdb", acTable, "tblCompradores", _
    "tblCompradores"
  dbs.Close
 Set dbs = Nothing
End Sub

Existem mais formas de ligar a tabelas com password podes encontrar coisas muito interessantes nas dicas do Mestre Avelino, no qual aproveito para agradecer toda a dedicação e empenho.

Abraço

Olá ahteixeira
Todas as dicas são sempre bem vindas

Na minha situação obrigatoriamente tenho de ter o 2007 e 2010, pois também necessito de aceder a base de dados 2010 (Não criada por mim).

A senha que utilizo não é para ligar tabelas (estão em SQL Server), mas sim para proteger a base de dados de importação/ligação de tabelas que de maneira fácil poderiam obter uma ligação às tabelas ODBC do sql server.
Sei que à softwares que descobrem essas senhas, mas sempre é mais uma segurança.
Conforme a disponibilidade estou a converter todos os formulários para desvinculados e aí sim julgo que fique bastante segura.

Um abraço e agradeço a quem me poder ajudar a resolver esta situação

Olá,

Bom quanto às versões , podes realmente ter as duas, mas se não for para desenvolvimento o 2010 seria suficiente, mas adiante, também se pode ter mais que uma versão instalada.
Segundo percebi, tens uma base de dados com front_end que liga ao SQL e se alguém abrir a base de dados tem acesso aos dados, é isso?
Não sei como é efetuada a ligação, mas se ficam os dados disponíveis ao abrir alguma coisa e guardada na tabela, verifica o link abaixo do mestre Avelino, se poderá ser utilizada a mesma técnica.

http://maximoaccess.forumeiros.com/t13188-protec-seguranca-maxima-para-suas-tabelas?highlight=PROTEC

Abraço

Viva
Em relação a "Segundo percebi, tens uma base de dados com front_end que liga ao SQL e se alguém abrir a base de dados tem acesso aos dados, é isso?"
Não é bem isso, liga ao SQL Server através de tabelas ligadas e o utilizador não tem acesso aos dados, mas se não tivesse senha teria acesso aos dados se utiliza-se o menu do access para importar dados e fazia o link às tabelas numa nova base de dados.

A técnica do mestre Avelino está fantástica, mas optei por ir convertendo para formulários desvinculados e penso que seja a forma mais segura e eficiente para ligar ao SQL Server.

Obrigado pela dica do mestre Avelino, será óptima quando os dados ficam armazenados em access.

Abraço