Ajout check des emails

This commit is contained in:
Rodolphe Quiedeville 2004-10-07 15:29:56 +00:00
parent c77dcc6975
commit 6afc53a259

View File

@ -191,7 +191,12 @@ if ($result)
}
else
{
print '<td><a href="mailto:'.$obj->email.'">'.$obj->email.'</a>&nbsp;</td>';
print '<td><a href="mailto:'.$obj->email.'">'.$obj->email.'</a>&nbsp;';
if (!valid_email($obj->email))
{
print "Email Invalide !";
}
print '</td>';
}
print "</tr>\n";