Como Validar Um Campo E-mail

[bass]

ESTOU FAZENDO UM FORM DE LIVRO DE VISITAS...E SÓ UM TESTE.. www.aspecto.net/magnapagana

já CONSEGUI VALIDAR O CAMPOS QUE SÓ PODEM CONTER NUMEROS .

MAS E E-MAIL. NÃO...

Agradeço a ajuda....

[rockbilly]

talvez isso aqui te ajude:

Validar EMAIL

[Decio]

Uma forma mais simples:

email="fulano@yahoo.com.br"

If (InStr(1, email, "@")) = 0 Then 'erro

If (InStr(1, ucase(email), ".COM")) = 0 Then 'erro

Neste caso você esta só verificando se existe o "@" e o ".com" que deve ter em qualque endereço de e-mail.

[JoaquimSantos]

Uma forma mais simples:

email="fulano@yahoo.com.br"

If (InStr(1, email, "@")) = 0 Then 'erro

If (InStr(1, ucase(email), ".COM")) = 0 Then 'erro

Neste caso você esta só verificando se existe o "@" e o ".com" que deve ter em qualque endereço de e-mail.

eu discordo do .com em todos os e-mails.. porque eu pelo menos não tenho .com em um e-mails... e a maioria dos e-mails providos pelos provedores de onde moro são com terminio .net..

isso e somente um COMENTARIO...

[Decio]

Neste caso bastaria incluir:

If (InStr(1, UCase(email), ".COM")) = 0 And InStr(1, UCase(email), ".NET") = 0 then 'erro...etc...etc..etc.. ou simplesmente verificar se existe a arroba e o ponto.

Em todo caso é só uma sugestão mais simples.