la pagina main1.asp è qs:






<% If Session("userAdmin") = 1 then %>

<% Else %>

<% End If %>
<%
If Session("userGood") = False or IsNull(Session("userGood")) = True then
Response.Redirect"default.asp"
End If
strUserName = Replace(Session("userName"), "'", "''")
userID = Clng(Session("userID"))
userAdmin = Replace(Session("userAdmin"), "'", "''")
Session("userID") = userID
%>
Welcome <% =strUserName %> to the password protected area of the web site.