Ver Mensaje Individual
  #1 (permalink)  
Antiguo 19/12/2008, 09:01
jorgegetafe
 
Fecha de Ingreso: febrero-2008
Ubicación: Madrid
Mensajes: 474
Antigüedad: 16 años, 3 meses
Puntos: 1
Exclamación Comprobación campo correo

Quiero validar el correo que introduce el usuario, pero el siguiente código me dice siempre que el correo es erróneo :

Código:
 If TextEmail.Text <> "" Then
                If Not TextEmail.Text Like ("*@*.*") Then
                    mensajeError = mensajeError & " correo electrónico "
                    ok = False
                End If
            End If
¿Tengo bien la sentencia de comparación del like?

gracias