Olá a todos do fórum,
O que há de errado neste código que realiza um update na tabela:
A questão é que o ideal é que este form seja aberto em modo oculto, mas fiz alguns teste e percebi que o update não ocorreu na maioria das vezes. Um outro detalhe é que quando o form está rodando em modo visível também não ocorre o update, mas quando dou um click em dos campos ObsNovaCla, o updade acontece?
Onde está o erro? Preciso acrescentar algo mais?
Obrigado a todos que ajudarem.
O que há de errado neste código que realiza um update na tabela:
- Código:
Private Sub Form_Timer()
'FAZ A COMPARAÇÃO
If Me.PrazoEspera < Time$() Then
'SE VERDADEIRO FAZ O UPDATE
CurrentDb.Execute "update CLA_Classifica set CLASSIFICAÇÃO = " & Me.NOVACLASSIFICAÇÃO & ", ObsNovaCla = '" & Me.ObsNovaCla & "' WHERE [PrazoEspera] < time$()" ';"
'SE FALSO NÃO FAZ NADA
Else
'FINALIZA A CONDIÇÃO SE
End If
'ATUALIZA O FORM
Me.Recalc
'ENCERRA A ROTINA
End Sub
A questão é que o ideal é que este form seja aberto em modo oculto, mas fiz alguns teste e percebi que o update não ocorreu na maioria das vezes. Um outro detalhe é que quando o form está rodando em modo visível também não ocorre o update, mas quando dou um click em dos campos ObsNovaCla, o updade acontece?
Onde está o erro? Preciso acrescentar algo mais?
Obrigado a todos que ajudarem.