Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Ketchuz en 20 Abril 2011, 04:52 am



Título: Descomponer fechas en Visual basic 6
Publicado por: Ketchuz en 20 Abril 2011, 04:52 am
Hola a todos ::)
Les pido su ayuda por favor.
Estoy haciendo un programa en el que necesito guardar un archivo y que el nombre de tal archivo sea la fecha de hoy. Es problema es que Windows no admite "-" o "/" en los nombres de archivos, por lo que quiero que si la fecha es: 19/04/2011 o 19-04-2011 me separe los días, meses y el año de una fecha.
Por favor, me urge saber como. He investigado y encontré pero para hacerlo con nombres y apellidos. >:(
Gracias de antemano... :)


Título: Re: Descomponer fechas en Visual basic 6
Publicado por: Dunkansdk en 20 Abril 2011, 04:58 am
Edit - Flashie que era la hora, perdón ajaj


Título: Re: Descomponer fechas en Visual basic 6
Publicado por: EddyW en 20 Abril 2011, 05:00 am
Wenas,

Hay 3 funciones que te ayudan a manejarlos:
Código
  1. Dim Fecha As Date
  2. Fecha = "11/12/13"
  3. MsgBox Day(Fecha) & Month(Fecha) & Year(Fecha)
Es ese caso la función Day devuelve el día, Month el Mes y Year el año, en el ejemplo se muestra un Msg con los datos juntos.

SaluDOS!!!
Advertencia - mientras estabas escribiendo, una nueva respuesta fue publicada. Probablemente desees revisar tu mensaje.


Título: Re: Descomponer fechas en Visual basic 6
Publicado por: Ketchuz en 20 Abril 2011, 05:15 am
Código
  1. Dim Fecha As Date
  2. Fecha = "11/12/13"
  3. MsgBox Day(Fecha) & Month(Fecha) & Year(Fecha)

Gracias, si me ha funcionado, pero la fecha cambia. Por ejemplo, para el dia de hoy crea un archivo llamado "190411", ¿pero mañana?. ¿Cómo hago para que cambie según del día?


Título: Re: Descomponer fechas en Visual basic 6
Publicado por: EddyW en 20 Abril 2011, 05:21 am
Es la función now
Código
  1. Dim Fecha As Date
  2. Fecha = now
  3. MsgBox Day(Fecha) & Month(Fecha) & Year(Fecha)
Mostrará la fecha de hoy, mañana, la fecha de mañana..

SaluDOS!!!


Título: Re: Descomponer fechas en Visual basic 6
Publicado por: ŞCØRPIØN-X3 en 1 Mayo 2011, 02:51 am
Tambien puedes hacerlo con Format de la siguiente manera:

Código:
MsgBox "Dia: " & Format(Date, "DDDD") & " " & Format(Date, "DD")
MsgBox "Mes: " & Format(Date, "MM") & "(" & Format(Date, "MMMM") & ")"
MsgBox "Año: " & Format(Date, "YY") & " , " & Format(Date, "YYYY")

te devolvera de la sigueinte manera:

Código:
Msgbox1: "Dia: Sabado 30
Msgbox2: Mes: 04 (Abril)
Msgbox3: Año: 11 , 2011

Espero que te sirva ;)