MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Compartilhe

    wsenna
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 470
    Registrado : 22/12/2009

    [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  wsenna em Qua 04 Maio 2016, 04:33

    Olá Feras de plantão, bom dia.

    Amigos, novamente venho solicitar a ajuda dos Mestres para o seguinte:

    Num formulário para edição de Atas possuo um campo do tipo Memorando denominado Motivo e o que pretendo é que a cada dois minutos em que este campo esteja sendo editado, ou seja, com foco e diferente de Nulo, uma rotina salve todo o registro e exiba uma caixa de mensagem do tipo "Registro salvo preventivamente".

    Abraços, WSenna


    Última edição por wsenna em Qui 12 Maio 2016, 19:07, editado 4 vez(es)

    Dilson
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  Dilson em Qui 12 Maio 2016, 05:06

    Pode ser que tenha pensado, mas, e se tivesse um outro campo igual do tipo memorando e a cada 2 minutos fizesse currentdb.execute "UPDATE Tabela SET CampoMemo2=" & me.CampoMemo1 & " WHERE id=" & tal e ao final do após atualizar que indicaria a finalização da digitação faria a comparação usando oldvalue e se tivesse diferente mostraria o rascunho salvo e opção de autocomplete. Esse recurso que propõe é interessante e a ideia solução precisa ser amadurecida.


    .................................................................................
    Atenção:
    => Antes de implementar qualquer dica, faça um backup do seu projeto;
    => Retorne para marcar o Resolvido ou continuar a discussão;
    => Sempre realize pesquisas antes de postar uma pergunta;

    wsenna
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 470
    Registrado : 22/12/2009

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  wsenna em Qui 12 Maio 2016, 13:32

    Olá Dilson, bom dia.

    Amigão, penso que a ideia é muito válida, devemos sim amadurecê-la.
    É, deveras, desanimador você perder alguns minutos digitando um campo memorando que pode exigir concatenação de ideias e repentinamente uma queda de energia, uma reinicialização do servidor ou coisa parecida jogar por terra aquilo que você levou tempo para redigir.

    Vamos nessa direção que me parece esplêndida e aguardemos que novos Mestres se juntem a nós.

    Abraços, WSenna

    Dilson
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  Dilson em Qui 12 Maio 2016, 14:33

    Bom dia WSenna!

    Eu havia citado oldvalue e só para constar, não caberá oldvalue nisso. De ontem pra hoje analisei que pra fugir das famosas mensagens que outro usuário está atuante no registro (apesar de estar sem proteção), podemos fazer o salvamento numa outra tabela e depois fazer comparativo. Na primeira oportunidade vou arriscar alguma coisa aqui e se der certo informo.


    .................................................................................
    Atenção:
    => Antes de implementar qualquer dica, faça um backup do seu projeto;
    => Retorne para marcar o Resolvido ou continuar a discussão;
    => Sempre realize pesquisas antes de postar uma pergunta;

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  ahteixeira em Qui 12 Maio 2016, 14:58

    Olá Amigos,
    WSenna, veja se atende, está a fazer de 30 segundos em 30 segundos.
    Código:
    Option Compare Database

    'ahteixeira 2016 para MaximoAccess
    Private Sub Form_Open(Cancel As Integer)
        Me.TimerInterval = 0
    End Sub

    Private Sub Form_Timer()
        DoCmd.RunCommand acCmdSaveRecord
        Me.Gravado = Now()
    End Sub

    Private Sub ObsMemo_GotFocus()
        Me.TimerInterval = 30000 '30 segundos
    End Sub

    Private Sub ObsMemo_LostFocus()
        DoCmd.RunCommand acCmdSaveRecord
        Me.Gravado = Now()
        Me.TimerInterval = 0
    End Sub


    Download disponível no Repositório de exemplos:
    [Você precisa estar registrado e conectado para ver este link.]

    Abraço


    Última edição por ahteixeira em Qui 12 Maio 2016, 15:38, editado 1 vez(es)

    Dilson
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  Dilson em Qui 12 Maio 2016, 15:14

    Testei aqui e está aprovado. De uma simplicidade que me faz dizer como é que eu não saquei dessa forma antes do amigo. Parabéns ahTeixeira!

    Vamos aguardar o amigo WSenna.

    Cabe guardar o exemplo no repositório para não se perder nessa imensidão de tópicos da sala de dúvida.


    .................................................................................
    Atenção:
    => Antes de implementar qualquer dica, faça um backup do seu projeto;
    => Retorne para marcar o Resolvido ou continuar a discussão;
    => Sempre realize pesquisas antes de postar uma pergunta;

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  ahteixeira em Qui 12 Maio 2016, 15:47

    Dilson obrigado, estamos cá todos pela mesma causa Access.
    Segui a recomendação e já está no repositório.
    Isto é que é ser MáximoAccess.

    Ficamos aguardar o retorno do amigo WSenna.
    cheers

    wsenna
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 470
    Registrado : 22/12/2009

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  wsenna em Qui 12 Maio 2016, 16:50

    He he he, fico até espantado!!!

    Amigão AhTeixeira, há quanto tempo...
    Perfeita a sua sugestão, como diz o velho Guru JPaulo, "Funfou na boa".

    Grande abraço aos dois.


    WSenna


    Última edição por wsenna em Qui 12 Maio 2016, 18:59, editado 1 vez(es)

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  ahteixeira em Qui 12 Maio 2016, 17:40

    Olá, fico feliz por ter "funfado na boa".

    Reparei que ao salvar está a ir para o inicio do campo memo.
    Poderá ser melhorado o código ao salvar ir para o fim do texto.
    Estou no telemóvel, mas fica aqui a dica.
    Abraço a todos.

    wsenna
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 470
    Registrado : 22/12/2009

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  wsenna em Qui 12 Maio 2016, 18:56

    Caro AHTeixeira.

    Reparei esse detalhe.
    E outro, caso o usuário coloque o cursor no campo memorando o seu sistema gerava um novo registro.

    Resolvi ambas as pendências da forma abaixo:

    Private Sub Form_Timer()
       If Not IsNull(Assunto) Then
       DoCmd.RunCommand acCmdSaveRecord
       Me.Gravado = Now()
       Me.ObsMemo.SetFocus
       Else: End If
    End Sub

    Dessa forma o cursor permanecerá na posição em que estiver no ato do procedimento.

    Contudo, fico aberto à novas instruções afinal nunca é demais privar dessa troca de conhecimentos que tanto engrandece os membros deste Fórum.

    Abraços, WSenna

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  ahteixeira em Qui 19 Maio 2016, 12:16

    Olá Wsenna, obrigado pelo retorno.
    Fica mais essa dica.

    E aqui vai mais uma:
    Para colocar o cursor no fim, podemos usar a instrução abaixo:
    Código:
    Me.ObsMemo.SelStart = Len(Me.ObsMemo & "")

    Abraço

    wsenna
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 470
    Registrado : 22/12/2009

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  wsenna em Qui 19 Maio 2016, 12:43

    Caríssimo Teixeira, bom dia.

    Muito obrigado pela dica, o que já era perfeito agora está divino.

    Abraços, WSenna

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Salvar registro a cada dois minutos caso campo memorando esteja com foco.

    Mensagem  ahteixeira em Qui 19 Maio 2016, 13:45

    lol!

      Data/hora atual: Seg 05 Dez 2016, 16:32