Codice ASP e funzionamento su pc diversi

[fraude]

Ho provato lo script:

<%

strdal_giorno = cdate("02/08/2006")

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

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

31/07/06-04/08/06 

a me funziona...