Website openantrag.de
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
OpenAntrag/OpenAntragLib/Models/Account/ChangePasswordModel.vb

43 lines
1.3 KiB

Imports System.ComponentModel.DataAnnotations
Imports System.Web
Imports System.Web.Security
Public Class ChangePasswordModel
Private _User As MembershipUser
Public Sub New()
If String.IsNullOrEmpty(_UserName) = True Then
_User = Membership.GetUser(HttpContext.Current.User.Identity.Name)
End If
End Sub
Private _UserName As String
Public Property UserName() As String
Get
Return _User.UserName
End Get
Set(value As String)
_User = Membership.GetUser(value)
End Set
End Property
<Required(ErrorMessage:="Bitte eingeben")>
<DataType(DataType.Password)>
<Display(Name:="Aktuelles Passwort")>
Public Property OldPassword() As String
<Required(ErrorMessage:="Bitte eingeben")>
<StringLength(100, ErrorMessage:="Das {0} muss mindestens {2} Zeichen lang sein.", MinimumLength:=6)>
<DataType(DataType.Password)>
<Display(Name:="Neues Passwort")>
Public Property NewPassword() As String
<Required(ErrorMessage:="Bitte eingeben")>
<DataType(DataType.Password)>
<Display(Name:="Passwortbestätigung")>
<Compare("NewPassword", ErrorMessage:="Das Passwort und die Bestätigung passen stimmen nicht überein.")>
Public Property ConfirmPassword() As String
End Class