MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Vincular tabela Nova

    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    [Resolvido]Vincular tabela Nova Empty [Resolvido]Vincular tabela Nova

    Mensagem  Assis 10/11/2015, 13:04

    Boa tarde amigos

    Depois de criar uma nova tabela no back_end, como vincula-la automaticamente ao abrir o front ?

    Sem ter necessidade de fazer como a imagem abaixo ?

    Obrigado

    [Resolvido]Vincular tabela Nova 2u600o1


    .................................................................................
    *** Só sei que nada sei ***
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Alvaro Teixeira 10/11/2015, 23:40

    Olá Assis, teste assim:

    Código:
    DoCmd.TransferDatabase acLink, "Microsoft Access", _
        "C:\NomePasta\BaseDadosBE.mdb", acTable, "NomeDaTabelaNoBE", _
        "NomeDaTabelaLigada-PodeSer_o_mesmo"

    Abraço
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Assis 11/11/2015, 00:18

    Teixeira

    "NomeDaTabelaNoBE" é o nome da nova tabela ?

    E pede a senha do back_End

    Funciona mas a ideia era não ter que digitar o nome da(s) tabela(s) nova(s)

    Obrigado Amigo.


    .................................................................................
    *** Só sei que nada sei ***
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Alvaro Teixeira 11/11/2015, 08:09

    Olá, respondendo à sua questão, sim é o nome da tabela do back end.
    Quanto à questão de ter password, também se resolve.
    Se compreendi bem a questão, você cria manualmente uma tabela no back end e desdja ao abrir que efectue a ligação (vinculo).

    Será possível fazer, no entanto a sua aplicação vai ficar mais lenta no arranque.
    Uma solução seria verificar as tabelas que tem no back_end e comparar com as tabelas ligadas, se faltar fazer a ligação.

    Na minha opinião, você deveria ter uma opção na aplicação de re-ligar (revincular) as tabelas, em que apagava as ligações existentes e criava novas.
    Veja no Maestro do Mestre Avelino.

    Abraço


    Última edição por ahteixeira em 11/11/2015, 17:21, editado 1 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Assis 11/11/2015, 11:50

    Teixeira

    Eu conheço o exemplo do Mestre Avelino.

    Mas aonde estou a tentar implementar esta situação é numa BD que ainda está e ficará sempre na versão 2003 cujo vinculo é feito através do nome de uma tabela.

    Porque 2003 ? Porque tem aquelas barras de menus antigos (MUITAS) que o 2003 tinha e que agora não funcionam.

    E como esta BD não tem parado de crescer eu não posso altera-la para uma versão superior ao 2003, por causa das ditas barras de menu.

    E como sempre que crio uma tabela nova lá tenho que fazer a vinculação do Access.

    O amigo escreveu na sua mensagem: Será possível fazer, no entanto a sua aplicação vai ficar mais lenta no arranque.

    Eu pergunto para não ficar mais lenta no arranque.

    Não é possível aplicar esse código, num botão que só será acionado por mim, quando houver uma tabela nova ?

    Ps: Relembrando que o Back_End tem senha .

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Alvaro Teixeira 11/11/2015, 14:53

    Olá Assis,
    Com este código pode ligar tabela em 2003 com password:
    Código:
    'ahteixeira 2015 maximoaccess
     Dim dbs As DAO.Database
      
     Set dbs = DBEngine.OpenDatabase(Application.CurrentProject.Path & "\dados2003.mdb", False, False, ";pwd=1234")
     DoCmd.TransferDatabase acLink, "Microsoft Access", _
        Application.CurrentProject.Path & "\dados2003.mdb", acTable, "lpCompradores", _
        "lpCompradores"
     
     dbs.Close
     Set dbs = Nothing


    Segue abaixo anexo do exemplo.

    Respondendo à questão, Sim, concordo,
    Você no seu projecto pode ter uma area de administração para inclusão (ligação) de novas tabelas.
    Poderá até pedir que seja colocado o nome da tabela.

    No código do exemplo deve alterar onde está:
    "lpCompradores"

    para:
    me.txtTabelaNova    (deve criar o campo no form previamente)

    O utilizador deve preencher o campo com o nome da nova tabela a ligar antes do clicar no botão ligar.
    Abraço
    Anexos
    [Resolvido]Vincular tabela Nova AttachmentExemploLigar2003.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (34 Kb) Baixado 22 vez(es)


    Última edição por ahteixeira em 29/1/2016, 15:02, editado 1 vez(es)
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4771
    Registrado : 06/11/2009

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Assis 11/11/2015, 17:10

    Obrigado Teixeira

    + 1(uma)


    .................................................................................
    *** Só sei que nada sei ***
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7914
    Registrado : 15/03/2013

    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Alvaro Teixeira 11/11/2015, 17:14

    Olá, obrigado pelo retorno.
    Nota final, o método utilizado no Maestro, também pode ser utilizado em base dados em mdb.
    Abraço

    Conteúdo patrocinado


    [Resolvido]Vincular tabela Nova Empty Re: [Resolvido]Vincular tabela Nova

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 11:40