Calcolo tra date

[wegawhite]

Ciao, volevo sapere se con ASP è possibile risalire all'ultimo giorno utile del mese precedente rispetto al mese corrente.

Forse con un esempio è più chiaro:

oggi è il 07/04/2006 (ma potrebbe essere un giorno qualsiasi del mese in corso dal 1 al 30 aprile) come faccio a sapere con asp che l'ultimo giorno utile del giorno precedente è il 31/03/2006 ??

Mi spiego?

[santino83]

funzione fai da te...speriamo che non ci voglia Alpitur

function lastday(mese,anno)
dim data,lg,t
t=false
for i=1 to 32
data=i & "/" & mese & "/" & anno
if not isDate(data) and t=false then
lg=i-1
t=true
end if
next
lastday=lg
end function

response.write lastday(2,2006) & "
"
response.write lastday(3,2006) & "
"
response.write lastday(4,2006) & "
"

[wegawhite]

Ecco ciò che restituisce la tua funzione:

28
31
30

ma il mese e l'anno ??? e rispetto a che cosa funziona ???? :master:

[viki1967]

No Alpitur? aiaiaiaiaiaiai...

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

myDate = convertdate(date())
myDate = split(myDate, "/")
anno = myDate(0)
mese = myDate(1)
giorno = myDate(2)

response.write myDate & "
"
response.write anno & "
"
response.write mese & "
"
response.write giorno & "
"

LastDayPreviousMonth = convertdate(dateserial(anno, mese, 0))
response.write LastDayPreviousMonth & "
"

[santino83]

eheheh sapevo che qualcosa di già fatto ci doveva essere si vede che non sono mai stato all'Alpitur

Funzione DateSerial
Restituisce un valore Variant del sottotipo Date per un anno, un mese e un giorno specifici.

DateSerial(anno, mese, giorno)

Argomenti
anno

Numero compreso tra 100 e 9999, inclusi, o espressione numerica.

mese

Espressione numerica.

giorno

Espressione numerica.

Osservazioni
Per specificare una data, quale 31 dicembre 1991, è necessario che l'intervallo di valori numerici di ciascun argomento di DateSerial sia compreso nell'intervallo di valori generalmente validi per l'unità, ovvero tra 1 e 31 per i giorni e tra 1 e 12 per i mesi. Per ciascun argomento è tuttavia possibile specificare date relative utilizzando un'espressione numerica che rappresenta un determinato numero di giorni, mesi e anni precedenti o successivi a una data specifica.

Nell'esempio riportato di seguito sono utilizzate espressioni numeriche anziché date assolute. In questo caso la funzione DateSerial restituisce una data che corrisponde al giorno precedente al primo giorno (1 - 1) di due mesi precedenti ad agosto (8 - 2) di 10 anni prima del 1990 (1990 - 10), ovvero il 31 maggio 1980.

Dim MyDate1, MyDate2
MyDate1 = DateSerial(1970, 1, 1) ' Restituisce 1 gennaio, 1970.
MyDate2 = DateSerial(1990 - 10, 8 - 2, 1 - 1) ' Restituisce 31 maggio, 1980.
Per l'argomento anno i valori compresi tra 0 e 99 inclusi sono interpretati come gli anni compresi tra il 1900 e il 1999. Per tutti gli altri argomenti anno, utilizzare un valore completo a quattro cifre, ad esempio 1800.

Gli argomenti non compresi nell'intervallo dei valori generalmente validi vengono incrementati all'unità successiva. Il valore 35 giorni, ad esempio, viene valutato come un mese e un certo numero di giorni a seconda del periodo dell'anno a cui fa riferimento. Se un argomento non è compreso nell'intervallo tra -32.768 e 32.767 oppure se la data specificata dai tre argomenti, in modo diretto o tramite un'espressione, non è compresa nell'intervallo di date consentito, viene generato un errore.

[santino83]

Originariamente inviato da wegawhite
Ecco ciò che restituisce la tua funzione:

28
31
30

ma il mese e l'anno ??? e rispetto a che cosa funziona ???? :master:

beh avevi chiesto l'ultimo giorno utile mica la data , e poi rispetto al mese e anno che passi alla funzione...

[wegawhite]

Originariamente inviato da santino83
beh avevi chiesto l'ultimo giorno utile mica la data , e poi rispetto al mese e anno che passi alla funzione...

Bè l'esempio mi sembrava chiaro...:

oggi è il 07/04/2006 (ma potrebbe essere un giorno qualsiasi del mese in corso dal 1 al 30 aprile) come faccio a sapere con asp che l'ultimo giorno utile del giorno precedente è il 31/03/2006 ??

Cmq grazie, siete tra i migliori!

[santino83]

io sono il migliore...il miglior del forum