How to use ExtLogin control?

Dec 2, 2009 at 6:07 PM


I am not able to use ExtLogin control.

Actualy, when login_LoginClicked  event executes code which sets custom Principal to Thread.CurrentPrincipal, its not redirecting to requested page.

Protected Sub login_LoginClicked(ByVal sender As Object, ByVal e As ExtExtenders.LoginEventArgs) Handles login.LoginClicked

        Dim Username As String = e.username
        Dim Password As String = e.password


Dim currentdomain.SetPrincipalPolicy(PrincipalPolicy.NoPrincipal)


<font size="2" color="#0000ff"><font size="2" color="#0000ff">

Thread.CurrentPrincipal =

<font size="2" color="#0000ff">



currentdomain As AppDomain = Thread.GetDomainDim oldprincipal As IPrincipal = Thread.CurrentPrincipalMe


Try <font size="2">



If Not TypeOf oldprincipal Is BusinessPrincipal Then

	End If 
<font size="2"></font>
End Try 
mIdentity = BusinessIdentity.LoadIdentity(username, password)
<font size="2"></font>
End sub

 Please suggest or give me a working example.