Como convertir una fecha en un numero entero

[jUaN_]

Buenos dias chicos

les hago una consulta, necesitaria convertir una fecha en un numero entero y viceversa. Alguien me puede explicar como se hace???

[Muzztein]

mmmmmm yia ..... y por ser asi como pretendes que una fecha sea un numero entero ????

por que hasta donde yo se los enteros son 1,2,3,4,5,6 etc etc y las fechas son 22 de marzo del 2004

de todas manetras existen dos funciones para convertir un string a determinado tipo de dato.

siempre y cuando sean esten dentro de ese dominio, de otra manera arrojara error.


numero = cint(numero) ' Convierte el contenido de numero en entero, siempre ycuando numero contenga un entero.

fecha = cdate(fecha) ' Convierte el contenido de fecha en una fecha valida, siemp're y cuando FECHA sea una fecha....



esop

[Bluesman74cl]

haber.. tendriamos que descompner la fecha primero y luego concatenarla para dar el resultado final de un numero...

dia = day(date) 'o variable que contenga la fecha
mes = month(date) 'idem
ano = year(date)

luego concatenamos..
numero = dia&mes&anno

ahora la cuestion es hacerlo al reves.. desde numero a dia mes anno y para trasnformarlo a fecha utilizas

Dateserial(anno, mes, dia)

Saludos

[Leonardo A. Sanchez]

No se si las respuestas anteriores te hayan servido, pero leyendo tu pregunta se me ocurre que lo que estas preguntando, tiene relacion con la parte entera de la fecha.

Bueno, en gran parte de los lenguajes de programación los datos tipo fecha a pesar de que los vemos con una mascara que nos indica por ejemplo "17 de Noviembre de 2004 12:57:00" en realidad se manejan a nivel de calculo y almacenamiento como un numero float, cuya parte entera indica la fecha y la parte decimal indica la hora.

Ahora pues basicamente nos tenemos que centrar en que lenguaje de programacíon usas para deternimar cual va a ser el procedimiento a utilizar para sacar la parte entera de la del valor, y asi obtener la fecha sin la hora.

Tienes que tener en cuenta que si haces la conversion en VB por ejemplo entonces tienes que obtener la fecha con una funcion de VB, hacer la convension del dato fecha a entero con una funcion VB y cuando quieras obtener de nuevo el dato tipo fecha tambien con una funcion en VB, esto porque en algunos casos algunos lenguajes para calcular cual es la fecha usando la parte entera la calculan a partir de 1/1/1900 y otros usan otra fecha base.

En esta funcion utilizo las diferentes conversiones en VB.

Sub Conversion()
Dim FechaCompleta As Date
FechaCompleta = Date + Time
Text1.Text = FormatDateTime(FechaCompleta, 0) + vbCrLf

Dim FechaFlotante As Double
FechaFlotante = CDbl(FechaCompleta)
Text1.Text = FormatNumber(FechaFlotante) + vbCrLf

Dim ParteEntera As Long
ParteEntera = FechaFlotante
Text1.Text = FormatNumber(ParteEntera) + vbCrLf

Dim FechasinHora As Date
FechasinHora = CDate(ParteEntera)
Text1.Text = FormatDateTime(FechasinHora, 0)
End Sub

Es bastante odvio despues de que leas el contenido que con Date obtienes la parte entera de la fecha actual hubiera podido tambien usar la funcion Now() que me trae la fecha y hora actuales juntos.

Espero que estos ejemplos solucionen tus dudas.

Chao