Visual Basic Foro

Programación => Visual Basic 6 => Mensaje iniciado por: YAcosta en Marzo 18, 2015, 03:59:18 pm

Título: ¿Como saber que es sábado?
Publicado por: YAcosta en Marzo 18, 2015, 03:59:18 pm
Amigos, me estoy haciendo pelotas, no logro conjugar bien la función de fecha.

¿como puedo saber de forma segura que el dia en el que corre el sistema es Sabado o no? ojo, que no le afecte ni la configuración regional, ni que la semana empiece con domingo, etc.

Muchas gracias, ojala me puedan ayudar que no la chunto.
Título: Re:¿Como saber que es sábado?
Publicado por: Bazooka en Marzo 18, 2015, 04:19:31 pm
Creo hay una funcion te devuelve el nombre del dia.
 Pero se me ocurre si le asignas a el formato de fecha larga esa q te devuelve algo así jue-14 de junio de 2015 y le extraes la cadena .??
Título: Re:¿Como saber que es sábado?
Publicado por: aedEric en Marzo 18, 2015, 04:37:22 pm
Hola Amigo no se si a esto te refieras
 
Código: [Seleccionar]
sDia = Format(Now, "dddd")

saludos desde México
Título: Re:¿Como saber que es sábado?
Publicado por: Waldo en Marzo 18, 2015, 04:44:34 pm
Creo que la funcion indicada es WeekDay

Copio de MSDN:

Ejemplo de la función Weekday
En este ejemplo se utiliza la función Weekday para obtener el día de la semana de una fecha especificada.

Dim MiFecha, MiDíaSemana
MiFecha = #12 febrero 1969#      ' Asigna una fecha.
MiDíaSemana = Weekday(MiFecha)   ' MiDíaSemana contiene 4 ya que
   ' MiFecha es un miércoles.

La función Weekday puede devolver cualquiera de estos valores:

Constante Valor Descripción
vbSunday 1 Domingo
vbMonday 2 Lunes
vbTuesday 3 Martes
vbWednesday 4 Miércoles
vbThursday 5 Jueves
vbFriday 6 Viernes
vbSaturday 7 Sábado
Título: Re:¿Como saber que es sábado?
Publicado por: aedEric en Marzo 18, 2015, 04:51:43 pm
Hola Waldo

perdon por mi ignorancia pero si aplicas esto a

Código: [Seleccionar]
sDia = Format("12/2/1969" "dddd")
el resultado es Miercoles

no es lo mismo y más facil perdon por si estoy mal o ya me perdi yo tambien
Título: Re:¿Como saber que es sábado?
Publicado por: Waldo en Marzo 18, 2015, 05:03:48 pm
Creo que la diferencia sería que WeekDay devuelve un valor numerico, ( numero de dia de la semana) y lo podrias usar en cualquier idioma, ahora si usas Format y devuelve "Miercoles" , si tu soft lo instalan en alguna maquina con operativo en otro idioma no funcionaria
Título: Re:¿Como saber que es sábado?
Publicado por: aedEric en Marzo 18, 2015, 05:07:00 pm
 ;) aclarado muchas gracias Waldo saludos
Título: Re:¿Como saber que es sábado?
Publicado por: YAcosta en Marzo 18, 2015, 05:07:49 pm
Gracias a todos por la pronta respuesta. Me quedo finalmente con esta opcion

Código: (VB) [Seleccionar]
If Weekday(MiFecha) = 7 Then
   ElCodigo
Else
   OtroCodigo
End if
Solo voy a averiguar que vbSaturday siempre y siempre y bajo toda condición o situación o configuración del Windows (idioma, region, etc) me va a arrojar 7. Solo necesito distinguir si es sábado o no.