Forum » » Le coin des codeurs » » [Résolu] - Prob de class, help me
Posté : 28 janv. 2005 à 01:47
if (strrpos($email,' ') > 0) { $erreur->email("espace", ""); }
if (strlen($email) < 6) { $erreur->email("court", ""); }
if (strlen($email) > 255) { $erreur->email("long", ""); }
if (!ereg("@", $email)) { $erreur->email("arobase", ""); }
if (preg_match_all("/([^a-zA-Z0-9_\@\.\-])/i", $email, $trouve)) { $erreur->email("interdit", implode(", ", $trouve[0])); }
if (!preg_match("/^([a-z0-9_]|\\-|\\.)+@(([a-z0-9_]|\\-)+\\.)+[a-z]{2,4}\$/i", $email)) { $erreur->email("incorrect", ""); }
list($compte, $domaine)=split("@", $email, 2);
if (!checkdnsrr($domaine, "MX")) { $erreur->email("incorrect_domaine", "$domaine");}
<?
class Erreur
{
function email($type_erreur, $autre) {
switch ($type_erreur) {
case "espace":
tableau("L'email ne doit pas contenir d'espace", FALSE);
exit;
case "court":
tableau("Adresse email trop courte", FALSE);
exit;
case "long":
tableau("Adresse email trop longue", FALSE);
exit;
case "arobase":
tableau("L'adresse email n'a pas d'arobase (@)", FALSE);
exit;
case "interdit":
tableau("Caractère(s) interdit dans l'email ($autre)", FALSE);
exit;
case "incorrect":
tableau("Adresse email incorrect", FALSE);
exit;
case "incorrect_domaine":
tableau("Ce domaine ($autre) n'accepte pas les emails", FALSE);
exit;
}
}
}
Message édité par : arnodu59
Cet article provient de NPDS
https://www.npds.org/viewtopic.php?topic=15333&forum=5