ASP.NET 2.0 - ACTIVER UN MEMBERSHIPUSER

Signaler
Messages postés
72
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
10 novembre 2008
-
Messages postés
19
Date d'inscription
vendredi 14 janvier 2005
Statut
Membre
Dernière intervention
6 mars 2013
-
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

Messages postés
19
Date d'inscription
vendredi 14 janvier 2005
Statut
Membre
Dernière intervention
6 mars 2013

Je teste actuellement la gestion des utilisateurs sur un site, j'ai réalisé un script similaire,tout fonctionne parfaitement sauf l'insertion du Guid dans le lien du mail.
J'arrise à inserer le login et le mot de passe avec :
.......<%UserName%>
.......<%Password%>
Pour le ProviderUserKey ?????
Utilisateur anonyme
Merci pour l'info ! Je cherchais justement l'autre jour.
A++
Messages postés
72
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
10 novembre 2008

Comment envoi t on le guid dans le lien ?
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