Giorno compreso nella settimana da... a...

[[trodat]]

Ciao, è possibile con ASP risalire al primo giorno ed all'ultimo giorno della settimana lavorativa di una determinata data?

Ad esempio oggi è il 27-07-2006, mi servirebbe sapere che il primo giorno in cui è compresa questa data è il 24-07-2006 e che l'ultimo giorno è il 28-07-2006.

Si può fare? Grazie...

[santino83_11_04]

l'unica cosa: se è sabato o domenica ti restituisce il lunedi/venerdi della settimana entrante, non passata

<%
dim data_attuale
data_attuale=date()

dim giorno_attuale

giorno_attuale=WeekDay(data_attuale)
'response.Write giorno_attuale
dim differenza,somma

differenza=giorno_attuale-2 '2 è lunedi

dim primo_giorgno,ultimo_giorno

if differenza>0 then
primo_giorno=dateadd("d",(differenza*-1),data_attuale)
elseif differenza<0 then 'è un sabato o una domenica e vado al lunedi della prossima settimana
if giorno_attuale=7 then 'sabato
primo_giorno=dateadd("d",2,data_attuale)
elseif giorno_attuale=1 then'domenica
primo_giorno=dateadd("d",1,data_attuale)
end if
else
primo_giorno=data_attuale
end if

'ultimo giorno (venerdi)
differenza=6-giorno_attuale '(se vuoi sabato allora metti 7 al posto di 6
if differenza>0 then
ultimo_giorno=dateadd("d",differenza,data_attuale)
elseif differenza<0 then 'era un sabato
ultimo_giorno=dateadd("d",6,data_attuale)'vado a venerdi della prossima settimana
else
ultimo_giorno=data_attuale
end if

response.write data_attuale & " " & primo_giorno & " " & ultimo_giorno
%>

sarà per l'ora ma spero di non aver fatto una ciofeca

[[trodat]]

Grazie, ma ci deve essere un problema:

function convertDate(theDate)
if isDate(theDate) then
theYear = datePart("yyyy",theDate)
theMonth = datePart("m",theDate)
theDay = datePart("d",theDate)
if theMonth < 10 then theMonth = "0" & theMonth
if theDay < 10 then theDay = "0" & theDay
convertDate = theYear & "/" & theMonth & "/" & theDay
end if
end function

strDal_giorno = convertdate(request.form("dal_giorno")) '2006/07/24

giorno_attuale = WeekDay(strDal_giorno)

Restituisce:

2
03/01/1900

[santino83_11_04]

dubito che il dateadd funzioni con la data in quel formato, non puoi usare le dtae in formato normale?

[[trodat]]

Originariamente inviato da santino83_11_04
dubito che il dateadd funzioni con la data in quel formato, non puoi usare le dtae in formato normale?

Non cambia nulla:

strDal_giorno = (request.form("dal_giorno"))
response.Write strDal_giorno &"
"

giorno_attuale = WeekDay(strDal_giorno)
response.Write giorno_attuale &"
"
response.write data_attuale & "-" & primo_giorno & "-" & ultimo_giorno

24/07/2006
2
--03/01/1900

[santino83_11_04]

scusa ma io se metto 24/7/2006 ottengo tutto corretto, anche con la data odierna...ma come lo hai inserito il mio script nel tuo codice?

[[trodat]]

Originariamente inviato da santino83_11_04
scusa ma io se metto 24/7/2006 ottengo tutto corretto, anche con la data odierna...ma come lo hai inserito il mio script nel tuo codice?

strDal_giorno = (request.form("dal_giorno"))

giorno_attuale = WeekDay(strDal_giorno)
response.Write giorno_attuale &"
"

differenza = giorno_attuale - 2

if differenza > 0 then
primo_giorno = dateadd("d", (differenza*-1), data_attuale)
elseif differenza < 0 then 
if giorno_attuale = 7 then
primo_giorno = dateadd("d", 2, data_attuale)
elseif giorno_attuale = 1 then
primo_giorno = dateadd("d", 1, data_attuale)
end if
else
primo_giorno=data_attuale
end if

differenza = 6 - giorno_attuale
if differenza > 0 then
ultimo_giorno = dateadd("d", differenza, data_attuale)
elseif differenza < 0 then 
ultimo_giorno = dateadd("d", 6, data_attuale)
else
ultimo_giorno = data_attuale
end if

response.write data_attuale & "-" & primo_giorno & "-" & ultimo_giorno

[santino83_11_04]

data_attuale= (request.form("dal_giorno"))

giorno_attuale = WeekDay(data_attuale)

[[trodat]]

Originariamente inviato da santino83_11_04

data_attuale= (request.form("dal_giorno"))

giorno_attuale = WeekDay(data_attuale)

Ancora non mi sveglio...
grazie!