Quitar la hora Fecha: 07/Feb/2005 (03-02-2005)
|
Este es un truco bastante útil para los profesionales que trabajamos con bases de datos que almacenan columnas tipo fecha con la hora incluida; al momento de realizar consultas o selecciones de datos asociados a esta columna, se puede obtener resultados no deseados.
Al trabajar con Visual Basic 6.0 o Visual Studio .Net y almacenar una fecha capturada de pantalla [por ejemplo con el control DTPicker] o seleccionada con la función Now(), obtenemos una fecha por este estilo:
17/7/2004 10:30:50 AM
Y a veces no se desea almacenar de esta forma, sino con este formato:
17/7/2004 ó 17/7/2004 00:00:00 AM
Un truco que se puede aplicar es reprimir los datos de la hora con este procedimiento:
Public Function QuitarHoraDeFecha(pDtmFecha As Date) As Date QuitarHoraDeFecha = DateSerial(Year(pDtmFecha), Month(pDtmFecha), Day(pDtmFecha)) End FunctionLa misma función aplica para Visual Basic .Net:
DateSerial(Year(x), Month(x), DateAndTime.Day(x))