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


    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Empty [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Mensagem  Assis em 15/3/2019, 13:16

    Boa tarde Amigos

    Na imagem explico a ajuda que necessito

    Obrigado

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Asem_t11


    .................................................................................
    *** Só sei que nada sei ***
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Empty Re: [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Mensagem  ahteixeira em 15/3/2019, 13:39

    Olá Assis,

    Então significa que só pode eliminar o último e assim sucessivamente.
    Para isso efetue o Dlookup ... do maior e com um IF será facil comparar antes de eliminar, que lhe parece?

    Abraço
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 280
    Registrado : 25/02/2016

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Empty Re: [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Mensagem  FranklinJSP em 15/3/2019, 14:35

    Bom día Assis

    Como Ahteixeira diz, seria assim no botão anular:

    Código:
    Dim Maior
    Maior = DMax("[LN]", "adiantado")
    If Maior > Me.LN then
      'Mensagem que não pode ser anulado
    else
      CurrentDB.Execute "DELETE * FROM  adiantado WHERE LN=" & [LN] & "'"
    End if

    Saludos


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Empty Re: [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Mensagem  Assis em 15/3/2019, 15:43

    Obrigado
    Franklin.


    .................................................................................
    *** Só sei que nada sei ***
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 280
    Registrado : 25/02/2016

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Empty Re: [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Mensagem  FranklinJSP em 15/3/2019, 16:50

    Boa tarde Assis

    lol! lol! lol!


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"

    Conteúdo patrocinado

    [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior Empty Re: [Resolvido]Eliminar em um formulário Continuo o ID com o numero maior

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/8/2019, 19:26