MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Update com grupo de Opções

    Compartilhe

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 20/04/2017

    Update com grupo de Opções

    Mensagem  daygdson em Qua 14 Mar 2018, 21:00

    Boa tarde pessoal, estou com um projeto em andamento para fazer um odontograma e estou pecando ao utilizar a atualização de tabela após selecionar uma opção em grupo de opções dentro do formulário secundário

    Formulário Principal : Prontuario
    Formulário Secundario: Grupo Opções
    O Que eu quero: Ao chamar o formulário secundário por um botão de ação,  eu selecione uma ação no grupo de 8 possíveis opções e altere valores do tipo sim/não no campo da tabela.

    Ex.: o que é "não" continue em "não" e o que é escolhido altere para "sim"

    Estou tentando conforme codigo abaixo no botão mas não altera valores do campo.
    Código:
    Private Sub Salvar_Click()
    Dim db As Database
    Dim rs As Recordset


    Set db = CurrentDb
    Set rs = db.OpenRecordset("TbAcoesDente")
    rs.Edit
    rs("Ausencia-Dente") = Me.cxAusenciaDente.Value
    rs("Ausencia-Coroa") = Me.cxAusenciaCoroa.Value
    rs("Deciduo") = Me.cxDeciduo.Value
    rs("Incluso") = Me.cxIncluso.Value
    rs("Semi-Incluso") = Me.cxSemiIncluso.Value
    rs("Microdente") = Me.cxMicrodente.Value
    rs("Permanente") = Me.cxPermanente.Value
    rs("Supranumerario") = Me.cxSupranumerario.Value
    rs.Update
    rs.Close
    db.Close
    Me.Requery


    DoCmd.RunCommand acCmdSaveRecord

    msg = MsgBox("Registro Gravado com Sucesso!", vbExclamation + vbOKOnly + vbDefaultButton2, "AVISO")
    DoCmd.Close

    End Sub

    Acredito que para os Mestres será mamão com açúcar, pois eu já estou travado e não consigo pensar mais em outra solução.
    Obs: Não coloquei o banco porque não estou conseguindo anexar.
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3875
    Registrado : 20/04/2011

    Re: Update com grupo de Opções

    Mensagem  Silvio em Qui 15 Mar 2018, 12:03

    Bom dia....


    Veja a dica nesse link para postar o banco de dados.

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 20/04/2017

    Re: Update com grupo de Opções

    Mensagem  daygdson em Sex 16 Mar 2018, 13:40

    Olá Caro Sílvio, com certeza eu fiz igual o video, porém quando tento colocar o BD e recebo a mensagem "Não é possível enviar o arquivo : o espaço total de armazenamento foi ultrapassado. (Espaço restante : 172 Kb), sendo que o limite é 4,28mb e meu BD tem 2,096mb e ja procurei nos meus arquivos enviados que é um total de 14,09mb de 49,00mb.

    vou ficar tentando colocar.

    Já quanto a solução estou empacado, não estou conseguindo ainda.
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3875
    Registrado : 20/04/2011

    Re: Update com grupo de Opções

    Mensagem  Silvio em Sex 16 Mar 2018, 13:48

    Bom dia...

    Estamos com problemas sim, tentei enviar um arquivo para outro colega e deu a mesma mensagem.

    Coloque ele em um servidor externo, Google, OneDrive, Mega, 4Shared.

    Coloque o link aqui, mas sem o Http.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    daygdson
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 46
    Registrado : 20/04/2017

    Re: Update com grupo de Opções

    Mensagem  daygdson em Sex 16 Mar 2018, 14:14

    Caro silvio, segue o link

    DatabaseTeste.zip

    de ante-mão, obrigado pela ajuda.

      Data/hora atual: Sex 25 Maio 2018, 19:44