Alguien compuso algo para que se pueda ingresar solo email
en un get?
o que valide que lo que se ha ingresado es email?
(para que no metan mysql inyectado).
gracias.
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour picture para Email?
Lo mejor es que uses expresiones regulares ( hb_regex() ).
Construir la expresión regular al principio parece algo engorroso, pero en google tienes bastantes de definidas, para e-mail puede servirte la siguiente
^[_a-z0-9-]+(.[_a-z0-9-]+)@[a-z0-9-]+(.[a-z0-9-]+)(.[a-z]{2,4})$
eso andaba buscando. gracias.
FUNCTION ValidEmailAddress( cMailAddress )
LOCAL cRegEx := "^[a-zA-Z0-9._%-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,4}$"
LOCAL lIsValid := FALSE
IF ( AllTrim(cMailAddress) LIKE cRegEx )
lIsValid := TRUE
ENDIF
RETURN lIsValidSalu2
Carlos Vargas
Desde Managua, Nicaragua (CA)
Carlos Vargas
Desde Managua, Nicaragua (CA)
carlos vargas wrote:FUNCTION ValidEmailAddress( cMailAddress ) LOCAL cRegEx := "^[a-zA-Z0-9._%-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,4}$" LOCAL lIsValid := FALSE IF ( AllTrim(cMailAddress) LIKE cRegEx ) lIsValid := TRUE ENDIF RETURN lIsValid
gracias!