Autor Tema: ¿Como saber que es sábado?  (Leído 4639 veces)

0 Usuarios y 1 Visitante están viendo este tema.

YAcosta

  • Moderador Global
  • Exabyte
  • *****
  • Mensajes: 2853
  • Reputación: +160/-38
  • Daddy de Qüentas y QüeryFull
    • Ver Perfil
    • Personal
¿Como saber que es sábado?
« 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.
Me encuentras en YAcosta.com

Bazooka

  • Terabyte
  • *****
  • Mensajes: 951
  • Reputación: +31/-20
  • El pibe Bazooka
    • Ver Perfil
    • Desof sistemas
Re:¿Como saber que es sábado?
« Respuesta #1 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 .??
Todos somos muy ignorantes. Lo que ocurre es que no todos ignoramos las mismas cosas.

aedEric

  • Megabyte
  • ***
  • Mensajes: 211
  • Reputación: +20/-0
    • Ver Perfil
Re:¿Como saber que es sábado?
« Respuesta #2 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
No he fracasado. He encontrado 10000 soluciones que no funcionan.

Waldo

  • Gigabyte
  • ****
  • Mensajes: 264
  • Reputación: +22/-0
    • Ver Perfil
Re:¿Como saber que es sábado?
« Respuesta #3 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

aedEric

  • Megabyte
  • ***
  • Mensajes: 211
  • Reputación: +20/-0
    • Ver Perfil
Re:¿Como saber que es sábado?
« Respuesta #4 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
No he fracasado. He encontrado 10000 soluciones que no funcionan.

Waldo

  • Gigabyte
  • ****
  • Mensajes: 264
  • Reputación: +22/-0
    • Ver Perfil
Re:¿Como saber que es sábado?
« Respuesta #5 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

aedEric

  • Megabyte
  • ***
  • Mensajes: 211
  • Reputación: +20/-0
    • Ver Perfil
Re:¿Como saber que es sábado?
« Respuesta #6 en: Marzo 18, 2015, 05:07:00 pm »
 ;) aclarado muchas gracias Waldo saludos
No he fracasado. He encontrado 10000 soluciones que no funcionan.

YAcosta

  • Moderador Global
  • Exabyte
  • *****
  • Mensajes: 2853
  • Reputación: +160/-38
  • Daddy de Qüentas y QüeryFull
    • Ver Perfil
    • Personal
Re:¿Como saber que es sábado?
« Respuesta #7 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.
Me encuentras en YAcosta.com