-- screensize.asp -- <% 'Verifichiamo se i cookie sono abilitati If Not Request.ServerVariables("HTTP_COOKIE") = "" Then 'Leggiamo il cookie e lo memorizziamo ScreenSize = Request.Cookies("ScreenSize") 'Se il cookie non esiste allora lanciamo 'il codice javascript che ricava le dimensioni 'dello schermo e le scrive nel cookie If ScreenSize = "" OR IsNull(ScreenSize) Then Response.Redirect "screensize_js.asp" End If 'Separiamo le due informazioni contenute 'nel cookie unite dal carattere - ScreenX = Split(ScreenSize, "-")(0) ScreenY = Split(ScreenSize, "-")(1) 'Visualizziamo le dimensioni dello schermo Response.Write "Larghezza schermo: " & ScreenX Response.Write "
" Response.Write "Altezza schermo: " & ScreenY 'Cancelliamo il cookie Response.Cookies("ScreenSize").Expires = Date - 3 'Cookie non supportati Else Response.Write "Spiacenti, i cookie non sono abilitati" End If %> -- screensize_js.asp --