terça-feira, 22 de agosto de 2017
assinantes
   Assinatura Ativo Access


Não Assinantes
ConteÚdo
DOWNLOADS
Interação
dicas aleatórias
Dicas

Função para converter Data
Autor:  Osmar Junior (jrosmar@yahoo.com.br)
Publicado:  18/02/2004
Visitas: 7476
 
Função para converter data

Para facilitar a vida nos tratamentos de datas, convertendo datas em qualquer formato para o formato americano, que é entendido nas consultas:


Function ConvDtUSA(x As Variant)
If Not IsDate(x) Then Exit Function
ConvDtUSA = "#" & Month(x) & "/" & Day(x) & "/" & Year(x) & "#"
End Function



Crie a função acima em um módulo padrão e está feito...

No código ficaria:

SELECT * FROM tbTabela WHERE DataInicial = " & ConvDtUSA(Me!DataInicial)

  « Voltar

 

Assine AtivoAccess
     CD Ativo Access = R$ 44,70

 

   Copyright © Ativo Access 2003 - 2017- Todos os direitos reservados   Política de Privacidade | Fale conosco