Usuário com melhor resposta
Como validar o campo Textbox E-mail ?

Pergunta
-
Respostas
-
Paulo voce pode fazer isso usando "expressões regulares" segue modelo....
Obviamente isso não garante que o email existe, mas garante que o formato da grafia vai estar correto.
Abraços,
Eduardo
If txtEmail.Text <> Nothing Then
Dim strRegex As String = _
"^[-a-zA-Z0-9-_][-.a-zA-Z0-9-_]*@[-.a-zA-Z0-9]+(\.[-.a-zA-Z0-9]+)*\.(com|edu|info|gov|int|mil|net|org|biz|name|museum|coop|aero|pro|tv|[a-zA-Z]{2})$"
Dim re As New Regex(strRegex)
If (re.IsMatch(txtEmail.Text)) Then
Else
MsgBox("Formato do Email está errado, Corrija para poder continuar.")
e.Cancel = True
End If
End If- Sugerido como Resposta Lucio Rogerio SPBanned terça-feira, 28 de julho de 2015 11:19
- Marcado como Resposta Marcos SJ terça-feira, 28 de julho de 2015 18:50
Todas as Respostas
-
Paulo voce pode fazer isso usando "expressões regulares" segue modelo....
Obviamente isso não garante que o email existe, mas garante que o formato da grafia vai estar correto.
Abraços,
Eduardo
If txtEmail.Text <> Nothing Then
Dim strRegex As String = _
"^[-a-zA-Z0-9-_][-.a-zA-Z0-9-_]*@[-.a-zA-Z0-9]+(\.[-.a-zA-Z0-9]+)*\.(com|edu|info|gov|int|mil|net|org|biz|name|museum|coop|aero|pro|tv|[a-zA-Z]{2})$"
Dim re As New Regex(strRegex)
If (re.IsMatch(txtEmail.Text)) Then
Else
MsgBox("Formato do Email está errado, Corrija para poder continuar.")
e.Cancel = True
End If
End If- Sugerido como Resposta Lucio Rogerio SPBanned terça-feira, 28 de julho de 2015 11:19
- Marcado como Resposta Marcos SJ terça-feira, 28 de julho de 2015 18:50
-
-
Olá E.Gameiro,
Tudo bem?
Talvez se você explicar para o Paulo_Ti a lógica que ele precisa utilizar neste caso, seja mais fácil para ele resolver o problema. Desta forma ele só vai precisar aplicar a lógica de acordo com a linguagem/ambiente que ele está lidando. Assim ele mesmo poderá escrever o código que precisa para a situação em questão.
Atenciosamente
Marcos Roberto de Souza Junior
Esse conteúdo e fornecido sem garantias de qualquer tipo, seja expressa ou implícita
MSDN Community Support
Por favor, lembre-se de Marcar como Resposta as respostas que resolveram o seu problema. Essa e uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.
- Editado Marcos SJ terça-feira, 28 de julho de 2015 17:08
-
-
-
Ola Paulo..
Eu implementei o codigo abaixo na minha página ASP e funcionou perfeitamente bem, como você esta usando C# basta converter esse código.
If EMail.Text <> Nothing Then
Dim strRegex As String = _
"^[-a-zA-Z0-9-_][-.a-zA-Z0-9-_]*@[-.a-zA-Z0-9]+(\.[-.a-zA-Z0-9]+)*\.(com|edu|info|gov|int|mil|net|org|biz|name|museum|coop|aero|pro|tv|[a-zA-Z]{2})$"
Dim re As New Regex(strRegex)
If (re.IsMatch(EMail.Text)) Then
Else
Dim cstext1 As [String] = "alert('" & "Formato do Email está errado, Corrija para poder continuar." & "');"
cs.RegisterStartupScript(cstype, csname1, cstext1, True)
Exit Sub
End If
End IfAbraços,
Eduardo
-