codice:
<%
session.LCID = 1040
function differenzaGiorniLavorativi(dataIniziale, dataFinale)
differenza = 1
if isDate(dataIniziale) and isDate(dataFinale) then
dataIniziale = cDate(dataIniziale)
dataFinale = cDate(dataFinale)
differenzaDate = dateDiff("d",dataIniziale,dataFinale)
for i = 0 to differenzaDate
if datePart("w",dataIniziale) > 1 and datePart("w",dataIniziale) < 6 then
differenza = differenza + 1
end if
dataIniziale = dateAdd("d",1,dataIniziale)
next
end if
differenzaGiorniLavorativi = differenza
end function
response.write differenzaGiorniLavorativi("03/05/2007", "14/05/2007")
%>