Horario semanal

[Morgui]

Hola a todos y antes de nada gracias por vuestra ayuda.

Necesito hacer una tabla donde las columnas son los días de la semana (lunes, martes,...,domingo) y las filas deben tener la fecha real de ese día en la semana actual.

El problema es que no sé como asociar a cada casilla, la fecha real que le corresponde. Es decir, si hoy es miercoles 31 de agosto, la tabla empezará en el lunes 29 de agosto.

Agradecería cualquier orientación....

[Myakire]

¿Por que no implementas alguno de los calendarios que ya existen?

Pero bueno, independientemente de eso, si lo deseas hacer tu puedes auxiliarte de las funciones de fecha que existen para vbscript: http://www.w3schools.com/vbscript/vb...tions.asp#date

Saludos

[Myakire]

Algo rápido ...

Código:

<table border=1>
<tr><td>Domingo<td>Lunes<td>Martes<td>Miércoles<td>Jueves<td>Viernes<td>Sábado
<tr>
<%
Hoy = Weekday(Date())
Fecha = DateAdd("d",(Hoy-1)*(-1), Now())
'Como la semana empieza en Domingo (1) y termina en Sábado (7), iniciamos una variable con la fecha de inicio de semana. Si hoy es el día 4, hay que hacer un DateAdd con -3.
for i=1 to 7
  %><td><%=Fecha%><%
  Fecha = DateAdd("d",1, Fecha)
next
%>
</table>

Saludos

[Morgui]

Muchas gracias por tus respuestas, lo había planteado mucho más dificil de lo que era.
Lo he dejado así:

fecha=WEEKDAY (date(), VBMONDAY)
dif=fecha-i
fecha2=date()-dif

donde i vale 1 para el lunes, 2 para el martes...