Boa noite amigos!
Baseado em um código que consegui em uma aplicação que peguei aqui no forum.
no código em vba tem uma função ou codigo que capta o dado e joga em uma tabela.
só que a data informada na tabela esta assim: mm/dd/yyyy (mês, dia e ano).
Eu queria que armazenasse no formato normal do nosso país, dd/mm/yyyy
segue o código:
Baseado em um código que consegui em uma aplicação que peguei aqui no forum.
no código em vba tem uma função ou codigo que capta o dado e joga em uma tabela.
só que a data informada na tabela esta assim: mm/dd/yyyy (mês, dia e ano).
Eu queria que armazenasse no formato normal do nosso país, dd/mm/yyyy
segue o código:
- Código:
If IsNull(DLookup("[entrada1]", "controle_ponto", "[cd]=" & Me!txt_rf & " and pontodata=#" & Date & "#")) Then
DoCmd.SetWarnings False 'desativa a exibição de mensagens do sistema
DoCmd.RunSQL "INSERT INTO controle_ponto (cd,entrada1,pontodata) select " & Me.txt_rf & ",#" & Time & "#,#" & Date & "#"
DoCmd.SetWarnings True 'ativa a exibição de menssagens do sistema