ASP.NET 2.0 - ACTIVER UN MEMBERSHIPUSER
quineman
Messages postés
72
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
10 novembre 2008
-
19 sept. 2006 à 12:35
yann1947 Messages postés 19 Date d'inscription vendredi 14 janvier 2005 Statut Membre Dernière intervention 6 mars 2013 - 15 mars 2008 à 01:29
yann1947 Messages postés 19 Date d'inscription vendredi 14 janvier 2005 Statut Membre Dernière intervention 6 mars 2013 - 15 mars 2008 à 01:29
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/36200-asp-net-2-0-activer-un-membershipuser
https://codes-sources.commentcamarche.net/source/36200-asp-net-2-0-activer-un-membershipuser
15 mars 2008 à 01:29
J'arrise à inserer le login et le mot de passe avec :
.......<%UserName%>
.......<%Password%>
Pour le ProviderUserKey ?????
3 janv. 2008 à 16:15
A++
19 sept. 2006 à 12:35
C'est assez complexe pour un petit commentaire je pense ?
Merci pour la source !
En VB :
Imports System
Imports System.Data
Imports System.Configuration
Imports System.Collections
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Web.UI.HtmlControls
Partial Class authentification_validate
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim queryGuid As String
'on verifie qu'un guid est donné en parametre
If IsNothing(Request.QueryString("guid")) Then
queryGuid = Request.QueryString("guid")
Dim gu As New Guid(queryGuid)
'on récupére le membershipUser correspondant au guid
Dim User As MembershipUser
User = Membership.GetUser(gu)
If IsNothing(User) Then
User.IsApproved = True
Membership.UpdateUser(User)
'on active le compte utilisateur et on met à jour
lblMess.Text = "Votre compte est désormais actif."
Else
lblMess.Text = "L'utilisateur n'éxiste pas ou a été supprimé.
Vous devez créer un compte à nouveau."
End If
End If
End Sub
Protected Sub btnContinuer_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnContinuer.Click
Response.Redirect("~/authentification/Login.aspx")
End Sub
End Class