Foros del Web » Programando para Internet » ASP Clásico »

[SOLUCIONADO] Contar los días entre dos fechas pero sin sábados y domingos

Estas en el tema de Contar los días entre dos fechas pero sin sábados y domingos en el foro de ASP Clásico en Foros del Web. Bueno lo quiero es contar cuantos dias son entre dos fechas, solo contar los días de lunes a viernes sin sábados y domingos .. Ya ...
  #1 (permalink)  
Antiguo 15/07/2015, 16:41
 
Fecha de Ingreso: junio-2015
Mensajes: 78
Antigüedad: 9 años, 5 meses
Puntos: 0
Contar los días entre dos fechas pero sin sábados y domingos

Bueno lo quiero es contar cuantos dias son entre dos fechas, solo contar los días de lunes a viernes sin sábados y domingos ..


Ya use la funcion DateDiff

dias = DateDiff("d", FechaI, FechaF)

Pero solo me de vuelvo los dias entonces quiero saber como hacerle ya busque pero no me quedado claro, espero su ayuda..

Nota: Que ha pasado con usted alpe2000 necesito su ayuda....

Última edición por ggol15; 15/07/2015 a las 16:50
  #2 (permalink)  
Antiguo 15/07/2015, 17:12
 
Fecha de Ingreso: junio-2015
Mensajes: 78
Antigüedad: 9 años, 5 meses
Puntos: 0
Respuesta: Contar los días entre dos fechas pero sin sábados y domingos

Bueno ya encontré la respuesta a mi problema después de varias horas , se me perdio la pagina donde encontre esta solucion pero bueno lo pongo para quien lo requiera


'recibe dos fechas y nos dice cuantos
'días laborables hay entre esas dos fechas
Function diaslaborables(inicio,fin)
'busco la diferencia de dÃ*as que hay entre las dos fechas
diferencia = DateDiff("d", inicio, fin)
numLaborables = 0
fechaindice = inicio
'compruebo que la fecha de inicio es menor que la fecha fin
If inicio<fin Then
for i= 0 To diferencia
'si devuelve un num entre 2 y 6 inclusive entonces es un día laborable.
If Weekday(fechaindice)>=2 And Weekday(fechaindice)<=6 Then numLaborables=numLaborables+1
'pasamos al siguiente día
fechaIndice = DateAdd("d",fechaIndice,1)
next
End If

diaslaborables = numLaborables
End function

'inicializo la fecha de inicio al dÃ*a de hoy
fechainicio = Date()

'le agrego 7 dias a la fecha de inicio
fechafin = DateAdd("d",FechaI,7)
dias = diaslaborables(FechaI,FechaF)
response.write "Desde el dí*a "& FechaI & " hasta el día "&FechaF & " hay "&dias & " dias laborables"
  #3 (permalink)  
Antiguo 17/07/2015, 01:59
 
Fecha de Ingreso: enero-2008
Ubicación: Málaga - España
Mensajes: 346
Antigüedad: 16 años, 10 meses
Puntos: 13
Respuesta: Contar los días entre dos fechas pero sin sábados y domingos

Cita:
Iniciado por ggol15 Ver Mensaje
Nota: Que ha pasado con usted alpe2000 necesito su ayuda....
Vacaciones..... Relax, Playa y esas cosas. Pero veo que encontraste solución.
Aunque la función, tal cual la pusiste no funciona, supongo que hiciste los cambios oportunos.
  #4 (permalink)  
Antiguo 17/07/2015, 12:15
 
Fecha de Ingreso: junio-2015
Mensajes: 78
Antigüedad: 9 años, 5 meses
Puntos: 0
Respuesta: Contar los días entre dos fechas pero sin sábados y domingos

Si claro ya me funciono bien , nomas donde si requiero ayuda es otro tema que tengo abierto , ya que aquí estamos como en el cierto , solos , solos ni un alma q me ayude date la vuelta en el otro tema

Etiquetas: fecha
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:13.