<%@ Page Language="vb" %>
User property example
Sub Page_Load()
Message.Text = "Authenticated: " & User.Identity.IsAuthenticated & "
"
Message.Text &= "User Name: " & User.Identity.Name
End Sub