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

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    avatar
    Zeno
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 27/04/2016

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação Empty [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    Mensagem  Zeno 2/5/2016, 18:20

    Olá.

    Pretendo montar uma formulário para cadastramento de alunos e registro de documentos que o mesmo trouxe, imaginei uma tabela contendo as informações do aluno e outra com os tipos de documentos, porem,no momento em que o usuário for registrar o documento pode acontecer deste ser um documento que não está na minha lista(Logo não posso usar lista de combinação para auxiliar o usuário), pensei em uma lista de valores onde é possível inserir novos documentos durante o preenchimento do formulário, sabendo que novos documentos podem aparecer e que um aluno pode ter vários documentos e vários documentos estarão ligados a diversos alunos, como seria uma melhor forma de organizar os dados para facilitar tanto visualização e inserção de novos registros?

    Obrigado.


    Última edição por Dilson em 18/5/2016, 20:08, editado 1 vez(es) (Motivo da edição : Modificação do titulo para melhorar o sistema de buscas do fórum)
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação Empty Re: [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    Mensagem  Dilson 16/5/2016, 13:43

    Nesse caso o ideal é justamente usar a caixa de combinação, com recurso de cadastrar o documento caso não esteja no rol previamente cadastrados.

    Mantenha a tabela de documentos e no evento se não estiver na lista da combobox, use:

    Dim SQL As String
       If MsgBox("Tipo de Documento não consta relacionado no Sistema" & Chr(13) & Chr(13) & "Deseja cadastrar este doc. chamado " & UCase(NewData) & " agora?", vbYesNo, "Cadastro de Tipo de Documento") = vbYes Then
              DoCmd.SetWarnings False
              SQL = "INSERT INTO SuaTabelaDoc (NomeDoc) VALUES ('" & NewData & "')"
              DoCmd.RunSQL SQL
              DoCmd.SetWarnings True
              Response = acDataErrAdded
       Else
              Response = acDataErrContinue
       End If



    Propriedade da caixa de combinação: Limita a uma Lista = Sim


    Última edição por Dilson em 18/5/2016, 20:09, editado 1 vez(es) (Motivo da edição : Corrigir o evento.)
    Cláudio Más
    Cláudio Más
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1306
    Registrado : 21/01/2012

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação Empty Re: [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    Mensagem  Cláudio Más 17/5/2016, 09:40

    Só lembrando que o relacionamento é de um para muitos.
    Um aluno pode ter vários documentos, e um documento pertence somente a um aluno.
    Não confundir com "tipo de documento", que é um atributo de "documentos do aluno".
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação Empty Re: [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    Mensagem  Dilson 17/5/2016, 11:14

    Muto bem lembrado.

    O cadastramento do documento obedecerá a gravação do valor da chave primária da tabela aluno na chave estrangeira da tabela docsDoAluno.

    o código que passei atualizará o rol de documentos disponíveis para registro.




    avatar
    Zeno
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 27/04/2016

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação Empty Re: [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    Mensagem  Zeno 18/5/2016, 13:55

    Muito obrigado!

    Agora está mais claro oque fazer.
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009

    [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação Empty Re: [Resolvido]Relação e acréscimo de dados em outra tabela pela caixa de combinação

    Mensagem  Dilson 18/5/2016, 19:55

    Correção:

    O código que passei na #Mensagem n°2 é para ser aplicado no evento: Se não estiver na lista

    Obrigado por informar Resolvido e siga o bom trabalho!

      Data/hora atual: 1/12/2022, 20:18