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

3 participantes

    Duvida Vincular Tabelas

    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1599
    Registrado : 18/07/2010

    Duvida Vincular Tabelas Empty Duvida Vincular Tabelas

    Mensagem  Agravina 27/4/2020, 22:28

    Olá pessoal minha duvida onde coloco meu formulário para vincular as tabelas?

    Quero que o formulário só abra quando as tabelas não estiver vinculadas.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3751
    Registrado : 22/11/2016

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  DamascenoJr. 28/4/2020, 01:33

    Agravina escreveu:Quero que o formulário só abra quando as tabelas não estiver vinculadas.
    No evento ao abrir do formulário
    Código:
    Dim tbl As TableDef
       
        For Each tbl In CurrentDb.TableDefs
       
            If Eval("""" & Left(tbl.Name, 4) & """ not in (""usys"",""msys"")") Then
                If tbl.Connect <> "" Then
                    Call MsgBox("Não vou abrir para vincular! Já existem tabelas vinculadas.")
                    Cancel = True
                    Exit Sub
                End If
            End If
        Next tbl


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1599
    Registrado : 18/07/2010

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  Agravina 28/4/2020, 13:32

    Olá Amigo
    Minha ideia é quando abrir o form principal só abrir o form para vincular tabelas se as mesmas não estiverem vinculadas.

    Qual evento eu devo colocar no form principal?
    Agravina
    Agravina
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1599
    Registrado : 18/07/2010

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  Agravina 28/4/2020, 17:50

    Acho que ficaria melhor vincular automaticamente ao abrir o sistema.
    se não achar vincula ,como faço isso?
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3751
    Registrado : 22/11/2016

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  DamascenoJr. 28/4/2020, 20:57

    Veja
    usandoaccess.com.br/tutoriais/vinculando-tabelas-com-barra-de-progresso.asp?id=1

    Um ótimo artigo com um ótimo exemplo para estudo. Certamente resolve seu problema.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  Alvaro Teixeira 28/4/2020, 22:55

    Olá a todos,

    Alexandre, esse artigo do mestre Avelino Sampaio é excelente.
    No entanto como diz o nosso JPaulo "existe muitas maneiras de fazer Nestum".

    Veja por exemplo no formulário frm_logim a chamada da função fncTabelaEstaLigada do tópico abaixo se ajuda:
    https://www.maximoaccess.com/t27608-exemplo-de-sistema-multi-empresa

    Abraço a todos
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3751
    Registrado : 22/11/2016

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  DamascenoJr. 29/4/2020, 02:30

    mestre Alvaro, obrigado por participar. Conheço muitos tópicos para apontar, mas sempre passa algum despercebido. Obrigado por indicar.

    Idea


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3751
    Registrado : 22/11/2016

    Duvida Vincular Tabelas Empty Re: Duvida Vincular Tabelas

    Mensagem  DamascenoJr. 24/9/2020, 01:39

    Agravina, avançou aqui?

    Aguardamos retorno...


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

      Data/hora atual: 8/2/2023, 01:30