Skip Navigation Links
Novas Tecnologias
Ferramentas Adicionais
Ferramentas Adicionais


Dica No :
857
Assunto : ASP.NET
Titulo: Enviando e-mail para o usuário após o cadastro

Gostou do texto ? Vote e dê sua opinião! Pontuação atual :

Translate this page now :






Adicione aos Favoritos!
BlogBlogs Rec6 Linkk Ueba Technorati Delicious DiggIt! StumbleUpon


O CreateUserWizard possui uma propriedade chamada MailDefinition que permite o envio de e-mail para o usuário após o cadastro.

Já comentamos sobre o uso desta propriedade na dica em http://www.bufaloinfo.com.br/dicas.asp?cod=785

Uma das utilidades seria alterar a propriedade DisableCreatedUser para true e enviar um e-mail com um link para que o usuário faça sua ativação ao clicar no link, técnica muito usada pelos sites para garantir que o e-mail do usuário é verdadeiro.

Mas como fazer para que o link em questão contenha como parâmetro um ID do usuário e não o login do usuário de forma completamente aberta, já que, conforme mostra a dica citada a cima, as variáveis que temos representam o login e a senha do usuário ?

Para fazer isso podemos programar o evento sendingMail do createuserWizard.

Neste evento recebemos por parâmetro o próprio objeto de e-mail que vai ser enviado em seguida e podemos manipular, por exemplo, o corpo do e-mail.

No arquivo txt (definido na propriedade maildefinition) podemos montar algo assim, por exemplo :

"
Bem vindo <% username %> <br>
<br>
Para ativar seu login, basta clicar no link a seguir : <br>
<a href="meusite/ativarlogin.aspx?ID=%IDUSUARIO%">Ativar login</a>"


Observe que deixamos uma marca dentro do texto, "%IDUSUARIO%" essa marca nos permite fazer a inserção de um conteúdo neste ponto através do evento sendingMail.

Veja como fica o código :

Protected Sub CreateUserWizard1_SendingMail(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.MailMessageEventArgs) Handles CreateUserWizard1.SendingMail

Dim usuario As MembershipUser
usuario = Membership.GetUser(CreateUserWizard1.UserName)
e.Message.Body = e.Message.Body.Replace("%IDUSUARIO%", usuario.ProviderUserKey)

End Sub


Já para realizar a ativação do usuário, o código da página ativarlogin.aspx ficaria assim :

Dim usuario As MembershipUser
Dim chave As Object = Request.QueryString("ID")
usuario = Membership.GetUser(chave)
If Not IsNothing(usuario) Then
usuario.IsApproved = True
Membership.UpdateUser(usuario)
End If

Nome :
E-mail:
Comentarios :
 
 
Os Últimos Comentários
data: 1/31/2017 10:28:00 AM
nome: hSKIeHICuAk
email: derby451@hotmail.com
comentário:
IYLQ26 http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 7:46:00 AM
nome: mgFfspWTdDniJICnKs
email: jogcbfn@hotmail.com
comentário:
8JdHko http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 7:37:00 AM
nome: aTUzbJdUJwaiZ
email: derby451@hotmail.com
comentário:
m1YAaM http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/1/2017 2:57:00 PM
nome: wQQaEWzTimtDDJIsiB
email: jfvynms4281rt@hotmail.com
comentário:
PCgtA9 http://www.FyLitCl7Pf7ojQdDUOLQOuaxTXbj5iNG.com

data: 12/31/2016 1:49:00 AM
nome: oTlgwBjagysnZHt
email: jfvynms4281rt@hotmail.com
comentário:
SSzcNz http://www.FyLitCl7Pf7ojQdDUOLQOuaxTXbj5iNG.com

 1  
Dicas
Dica do Dia
Receba Dicas Por Email
E-mail :  
 


 (help)
Aceito receber informativos do devASPNet, informações de eventos e treinamentos

Veja Quais Informativos Você Receberá

Pesquisar Dicas
Pesquisar Artigos, Dicas e Noticias

Banco de Dados
Algumas Entrevistas
Links Importantes

Búfalo Informática, Treinamento e Consultoria
R. Alvaro Alvim, 37/920 Centro - Cinelândia - Rio de Janeiro Cep: 20031-010
Tel : (21) 2262-1368 (21) 9240-5134 E-mail : Contato@bufaloinfo.com.br