Programación General > Power Builder

 Validar Correo

(1/1)

alexis17:
buenas noches tengo otra consulta

quiero validar un correo que no meta mas de un @ o mas de un . punto

esta viendo esta validacion  me funciona pero solo valida qeu coloque el @ y el punto

long ll_pos, ll_pos2
        
         ll_pos = 0
         ll_pos2 = 0

         ll_pos = POS(dw_datos_proveedores.object.e_mail[1], "@")

      ll_pos2 = POS(dw_datos_proveedores.object.e_mail[1], ".",ll_pos)
         
         
         IF (ll_pos < 2 OR ll_pos2 < 1) OR (ll_pos2 <  ll_pos) THEN
           messagebox("error", "error")
            RETURN
         END IF

tambien tenia otra duda en esta linea
 ll_pos2 = POS(dw_datos_proveedores.object.e_mail[1], ".",ll_pos)

hay dicen que si no encuentra el . entonces empiza en la posicion que de vuelve el ll_pos  entonces retornara 0
verdad?

F_Tanori:
Valida tambien la longitud completa del correo, creo que tiene que ser mayora 5, la funcion Len te sirve para eso


Saludos

Navegación

[0] Índice de Mensajes