Imports Rocktime.Security

Partial Class PWFiles_LoginPanel
    Inherits System.Web.UI.UserControl
    Implements ISecurity

    Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLogin.Click

        CurrentUser.Login(True)
        
    End Sub

    Protected Sub btnLostPassword_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnLostPassword.Click

        mvLoginControls.ActiveViewIndex = 1

    End Sub

    Protected Sub btnGetPassword_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnGetPassword.Click

        mvLoginControls.ActiveViewIndex = 0

    End Sub

    Protected Sub txtLogOut_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtLogOut.Click

        CurrentUser.LogOut(True)

    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        btnLostPassword.Visible = False

        If CurrentUser.IsLoggedIn Then
            mvLoginControls.ActiveViewIndex = 2
            txtUserName.Text = CurrentUser.RealName
            txtLoginDate.Text = CurrentUser.LoginDate
            txtLastLoginDate.Text = CurrentUser.LastLoginDate
        Else
            CurrentUser.GetLoginField(phUserLogin)
            CurrentUser.GetPasswordField(phPassword)
            CurrentUser.GetEmailField(phEmail)
        End If

    End Sub

    Public Function CustomMD5(ByVal Md5Data As String) As String Implements Rocktime.Security.ISecurity.CustomMD5

        Return Md5Data

    End Function

End Class