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]Código anterior em caixa de texto

    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 9/1/2020, 10:01

    Olá Amigos
    Estou com uma dúvida e talvez seja algo simples.
    Tenho um formulario onde faço o cadastro dos colaboradores, e pretendo que em uma caixa de texto apareça o codigo anterior do colaborador digitado.

    Abraços e obrigado.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  Assis em 9/1/2020, 10:52

    Bom dia Rui

    Poste só a tabela e o formulário



    .................................................................................
    *** Só sei que nada sei ***
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 9/1/2020, 20:02

    Envio a BD.
    A caixa de texto é txtNiiAnterior que pretendo que apareça o valor do campo nii do registo anterior.
    Mais uma questão:
    É possível ao sair do formulário eliminar todos os registos com o campo nii em branco, ou seja, se nii estiver sem dados, eliminar todos os registos ao sair do formulário.
    Obrigado
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 9/1/2020, 20:04

    Aqui vai a BD.
    Anexos
    [Resolvido]Código anterior em caixa de texto Attachmentcadastro.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (79 Kb) Baixado 4 vez(es)
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 10/1/2020, 14:06

    Olá a todos,
    Alguém pode ajudar, haverá forma de resolver o que pretendo?
    Mais uma vez sou muito grato por todos deste fórum.

    Abraço a todos
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  DamascenoJr. em 11/1/2020, 02:53

    Veja se atende.
    Anexos
    [Resolvido]Código anterior em caixa de texto Attachmentcadastro_rev.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (92 Kb) Baixado 13 vez(es)


    .................................................................................
    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.
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 11/1/2020, 21:31

    Muito obrigado pela sua ajuda Damasceno.
    É mesmo isso que precisava, elimina os dados ao sair.
    Obrigado.
    No entanto, falta apenas a situação de aparecer o valor do campo nii do registo anterior. É possível?

    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 11/1/2020, 21:32

    Pretendo que apareça o valor do campo nii do registo anterior na caixa de texto é txtNiiAnterior do formulário.
    Obrigado
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  DamascenoJr. em 12/1/2020, 21:41

    No exemplo que enviei já existe essa funcionalidade. Baixe novamente o exemplo e navegue para o registro 2 e veja que aparece o código do registro anterior.


    .................................................................................
    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.
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 13/1/2020, 14:59

    Obrigado Damasceno pela sua ajuda, mas está a dar erro.
    Assim que adiciono um novo registo, dá erro.
    Outra coisa que acontece, é que quando adiciono o novo registo, ou altero um registo, na caixa de texto txtNiiAnterior não aparece o valor do registo anterior actualizado, ou seja, tenho de fechar o formulário e abrir novamente para que apareça os dados actualizados.
    Obrigado uma vez mais pela sua ajuda e disponibilidade.
    Anexo ficheiros com o erro que está a dar.
    Anexos
    [Resolvido]Código anterior em caixa de texto AttachmentmsgErro.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (668 Kb) Baixado 3 vez(es)
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  DamascenoJr. em 13/1/2020, 23:53

    Veja se resolve.
    Anexos
    [Resolvido]Código anterior em caixa de texto Attachmentcadastro_rev2.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (99 Kb) Baixado 14 vez(es)


    .................................................................................
    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.
    avatar
    rmjsantos
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 69
    Registrado : 31/10/2014

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  rmjsantos em 14/1/2020, 09:29

    Damasceno

    É mesmo isto.
    Muitíssimo obrigado pela sua ajuda e empenho.
    Agradeço muito.

    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  DamascenoJr. em 15/1/2020, 01:10

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    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.
    Jungli
    Jungli
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 677
    Registrado : 07/05/2010

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  Jungli em 15/1/2020, 17:58

    Sei que o tópico já está encerrado, mas gostaria de mostrar outra forma de fazer o mesmo, afinal informação nunca é de mais.

    Private Sub Form_Current()
    '// Cria e popula a variável
    Dim iRec As Integer: iRec = Me.NewRecord
    '// Verifica se está em um novo registro
    If iRec = True Then
    '// Popula o campo informado no formulário
    Me.txtNiiAnterior.Value = DLast("[nii]", Me.RecordSource)
    End If
    '// Fim
    Exit Sub
    End Sub

    Bem simples e evita muitas idas à tabela ganhando assim mais velocidade.

    Abs,


    .................................................................................
    "Somos o que repetidamente fazemos.
    A excelência, portanto, não é um feito,
    mas um hábito."

    Aristóteles
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  DamascenoJr. em 15/1/2020, 22:49

    cheers

    Obrigado por contribuir com o tópico.

    Vendo seu código, notei três pontos.

    1. Embora usar DLast apontando como domínio o Me.RecordSource faça parecer que a função não viajaria até a tabela, e que trabalharia diretamente no formulário, isso não acontece. No final, Me.RecordSource equivale a tblColaboradores e a função viajaria até a tabela mesmo assim para buscar o valor (correndo o risco inclusive buscar o valor em um registro aleatório, conforme a ajuda do access sobre a função DLast).

    2. As funções D (DLast, DMax, DMin etc) só funcionam quando o parâmetro domínio aponta para uma tabela ou consulta previamente existente. Se na propriedade fonte do registro (RecordSource) fosse usado uma instrução SQL (SELECT * FROM tblColaboradores ORDER BY tblColaboradores.codNii DESC;), o Access exibiria uma mensagem de erro.

    3. Mesmo que seja trocado recordset pelas função DLast (a sintaxe é até mais simples Very Happy ), e que instruções SQLs não sejam usadas na propriedade fonte do registro (RecordSource) do formulário, as viagens diminuiriam, mas somente porque o código só viajaria à tabela nos casos de um novo registro. Sendo assim, como ficaria a solicitação do rmjsantos que gostaria de ver os nii anteriores à medida que navega pelos registros?


    .................................................................................
    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.

    Conteúdo patrocinado

    [Resolvido]Código anterior em caixa de texto Empty Re: [Resolvido]Código anterior em caixa de texto

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/1/2020, 22:11