Tema: Calculo de Fechas
Ver Mensaje Individual
  #5 (permalink)  
Antiguo 04/10/2006, 04:23
Avatar de 3pies
3pies
Colaborador
  
Fecha de Ingreso: diciembre-2003
Ubicación: Desde una destilería
Mensajes: 2.584
Antigüedad: 21 años, 4 meses
Puntos: 144
Sacado de este sitio:
Código: 
<%
fecha = Date()
Semana_del_mes = Format(fecha, "ww", vbMonday) - Format(DateSerial(Year(fecha), Month(fecha), 1), "ww", vbMonday) + 1
Semana_del_anio = DatePart("ww", fecha, vbMonday)
Response.write "N&uacute;mero de la semana del mes: " & Semana_del_mes
Response.write "N&uacute;mero de la semana del a&ntilde;o: " & Semana_del_anio
%>
Salu2