Tania Costa Posted June 11, 2015 at 01:04 PM Report #584656 Posted June 11, 2015 at 01:04 PM (edited) Estou acabar o meu projecto de pap e a prof insiste em que ao guardar os registos caso o campo email nao seja preenchido com o (@) de uma mensagem de erro a dzer que o email nao e valido ja tentei varios codigos inclusive usando o errorprovider mas nada !! eis o codigo que utilizei Private Sub txtemail_Validating(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles txtemail.Validating If txtemail.Text.Trim.Length = 0 Then ErrorProvider1.SetError(txtemail, "Por favor introduza um código postal.") Else ErrorProvider1.SetError(txtemail, "") End If txtemail.Text = txtemail.Text.Trim End Sub Edited June 11, 2015 at 03:36 PM by thoga31 Tags code + GeSHi
HappyHippyHippo Posted June 11, 2015 at 01:24 PM Report #584657 Posted June 11, 2015 at 01:24 PM (edited) não sei como queres apresentar a mensagem, que mensagem o que pretendes fazer caso exista o dito arroba (@), no entanto, se o problema é detectar a existência desse caracter num texto (o que é cerca de 1% das regras da composição de uma endereço de email válido) então podes fazer: Dim email as String email = txtemail.Text.Trim() If email.Length = 0 Then ErrorProvider1.SetError(txtemail, "Por favor introduza um código postal.") // <--- código postal ? Else If email.IndexOf("@") == -1 Then ErrorProvider1.SetError(txtemail, "Por favor introduza um email válido.") Else ErrorProvider1.SetError(txtemail, "") End If ps : isso é VB e não C++ ... Edited June 11, 2015 at 01:27 PM by HappyHippyHippo 1 Report IRC : sim, é algo que ainda existe >> #p@p Portugol Plus
KTachyon Posted June 11, 2015 at 01:28 PM Report #584658 Posted June 11, 2015 at 01:28 PM Existem expressões regulares mais completas que verificar se existe o @. Por exemplo, a@a não é um email válido. a@a.aa já será válido (os TLDs têm , no mínimo, dois chars). Pesquisa por "RegEx email" e vais encontrar muitas expressões regulares para validares e-mails. De qualquer forma, se só queres mesmo verificar se existe o @, podes usar a função IndexOf(). Se a função devolver -1 é porque o @ não existe. BTW, esta não é a secção certa para perguntas de VB. “There are two ways of constructing a software design: One way is to make it so simple that there are obviously no deficiencies, and the other way is to make it so complicated that there are no obvious deficiencies. The first method is far more difficult.” -- Tony Hoare
Tania Costa Posted June 11, 2015 at 01:50 PM Author Report #584660 Posted June 11, 2015 at 01:50 PM a msg de do codigo postal foi apenas para ver o exemplo a funcionar num outro projecto mas ja experimentei o código e da 🙂 obrigado
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now