View Single Post
  #2 (permalink)  
Old August 22nd, 2006, 11:35 AM
~Bean~ ~Bean~ is offline
Friend of Wrox
Join Date: Jun 2003
Location: , , USA.
Posts: 100
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via AIM to ~Bean~

I found my own answer here:

Dim cookieName As String = FormsAuthentication.FormsCookieName
        Dim authCookie As HttpCookie = Context.Request.Cookies(cookieName)
        Dim authTicket As FormsAuthenticationTicket = Nothing
        authTicket = FormsAuthentication.Decrypt(authCookie.Value)
        Dim roles As String() = authTicket.UserData.Split(New Char() {"|"c})
        For Each r As String In roles
            Response.Write("arrayval=" & r & "<br />")
Beware of programmers with screwdrivers...