<%@LANGUAGE = VBScript%>
<%
' Recupero i dati dal modulo
Dim username, password
username = Request.Form("username")
password = Request.Form("password")
' Specifico la username e la password
If ((username = "user_1" And password = "demo") Or (username = "user_2" And password = "demo")) Then
Session("username") = username
Response.Redirect "privata.asp"
Else
Response.Write "ACCESSO NEGATO"
Response.End
End If
%>