<% if Request.TotalBytes > 0 then StrUser = Trim(Replace(Request.Form("user"), "'", "''")) StrPassword = Trim(Replace(Request.Form("passw"), "'", "''")) 'if StrUser <> "" and StrPassword <> "" then usrdb = "boxart" pwddb = "area285" If StrComp(usrdb,StrUser,0) = 0 And StrComp(pwddb,StrPassword,0) = 0 Then autenticato = true Else autenticato = false End If if autenticato = true then 'metti la pagina da mostrare Session("Autenticato")="OK" Response.Redirect("area_riservata.asp") else Session("Errore") = "Username e/o password non validi." 'metti una pagina di errore Response.Redirect("login.asp") end if 'end if end if %> Boxart
 
 

AREA RISERVATA

Per accedere all'area riservata è necessario identificarsi:

<%=Session("Errore")%>

login

password