visualizzare solo alcune date

[satoshi]

sappiamo che ad un numero corrisponde un giorno della settimana ad esempio 1 = domenica 7 = sabato .....

vorei visualizzare 5 date che fossero solamente quelle che hanno come valore 1 (domenica) prendendo in considerazione la data attuale e calcolando le 5 domeniche successive in questo modo

31/10/2004
07/11/2004
14/11/2004
21/11/2004
28/11/2004

[longline]

In SQl puro oppure va bene anche in VBScript?

[satoshi]

in VBScript scusa

[longline]

Mentre scorri il recordset puoi usare la funzione WeekDay() per sapere il giorno della settimana di una qualsiasi data.

Funzione WeekDay()

[satoshi]

in parte ci sonofacendo in questo modo ottengo cio' che mi interessa

<%
Data = Date()
For I = 1 To 5
%>

<%= FormatDateTime(Data, vbLongDate) %>


<%
Data = DateAdd("d", Data, 7)
Next
%>


domenica 31 ottobre 2004
domenica 7 novembre 2004
domenica 14 novembre 2004
domenica 21 novembre 2004
domenica 28 novembre 2004

in questo caso perche' oggi è domenica come devo inserire il codice che mi visualizza solamente le domeniche anche negli altri giorni ?


<% str_giorno_sett = weekdayname(1) %>

[satoshi]

nussuno mi sa aiutare?

[deivnet]

Prova così, prendi la data odierna che può essere qualsiasi,
fai un ciclo for aggiungendo uno alla data odierna finchè
non trovi la data con WeekDay = 1, a questo punto la memorizzi e poi esegui il tuo codice partendo da quella data.

<%
Data = Date()

'Ciclo finchè non trovo domenica
for x = 0 to 6
if WeekDay(Data) = 1 then
exit for
end if
Data = DateAdd("d", 1, Data)
next

'Poi esegui il tuo ciclo
For I = 1 To 5
%>

<%= FormatDateTime(Data, vbLongDate) %>


<%
Data = DateAdd("d", Data, 7)
Next
%>

[satoshi]

grazie mille tutto ok

[deivnet]

prego