Utilizar o comando TransferDatabase em um back-end com senha
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 10x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
Ao executar o comando TransferDatabase, com a intenção de vincular uma tabela de um back-end com senha, um formulário será aberto, solicitando que a senha seja inserida. Veja!
DoCmd.TransferDatabase acLink, "Microsoft Access", "c:\Maestro\maestro_v5_be.accdb", acTable, _
"tblClientes", "tblClientes"
Para contornar esta situação, usamos o recurso de abrir o back-end através do comando OpenDatabase e assim mantemos a conexão aberta do back-end até a conclusão do uso do comando Transferdatabase.
Leia atentamente os comentários do código proposto para você entender a seqüência:
Dim bd As DAO.Database
'-----------------------------------------
'Abre o back-end com senha
'-----------------------------------------
Set bd = DBEngine.OpenDatabase("c:\Maestro\maestro_v5_be.accdb",False, False, ";pwd=a1234")
'---------------------------------------------------------------------------------------------------------------------------
'Como o back-end já está com a conexão aberta, o TrasferDatabase não solicitará a senha
'--------------------------------------------------------------------------------------------------------------------------- DoCmd.TransferDatabase acLink, "Microsoft Access", "c:\Maestro\maestro_v5_be.accdb", acTable, _
"tblClientes", "tblClientes"
'--------------------------------------------------------
'Fecha o back-end e limpa a variável bd
'-------------------------------------------------------- bd.Close Set bd = Nothing
Bom estudo!
Os dez artigos mais visitados
MontaRibbons v.7.0 - Assistente completo para criar ribbons no Access
Vídeo - Controle personalizado de Acesso de Usuários
Vídeo - Segurança máxima, usando o OPEN
Uma ajuda para quem está começando um negócio ou um projeto
Vídeo - Aprenda sobre filtragens
Adquira o kit UsandoAccess e aprenda em alta velocidade
Vídeo - Programação de relatórios - Parte 1
Desabilitando a faixa(ribbon) superior do Access
Vídeo - Criando Ribbons parte 1 - Conhecendo a estrutura Xml
Como carregar o seu menu sem que ele vá para lista de suplementos
| Não há comentário |