Ver Mensaje Individual
  #5 (permalink)  
Antiguo 19/04/2002, 15:02
Avatar de Potro
Potro
 
Fecha de Ingreso: abril-2001
Mensajes: 2.249
Antigüedad: 23 años
Puntos: 39
Re: No me Llega el Mail con la funcion mail()

y el archivo _mail.php tendra que contener todo este desmadre...

******************************

<?
function xmail($from,$to,$subject,$core_msg)
{
$cmd_line=sprintf("sudo /var/qmail/bin/qmail-inject");
$fp=popen($cmd_line,"w");
$temp=sprintf("From: %s\n",$from);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
$temp=sprintf("To: %s\n",$to);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
$temp=sprintf("Subject: %s\n",$subject);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
$temp=sprintf("\n%s\n",$core_msg);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
pclose($fp);
}
function is_valid_mail($mailaddr)
{
/* Validate e-mail address */
/* Default return value is TRUE */
$rval=1;
/* Invalid characters */
$na="`~!#$%^&*()+=[]{};':\"<,>?/\| ";
$na_found=0;
$at_found=0;
$at_found=strpos($mailaddr,"@");
for($counter=0;$counter<strlen($na);$counter++)
{
$pos=strpos($mailaddr,substr($na,$counter,1));
if(!is_string($pos) && $pos) $na_found++;
}
if($na_found>0 || !$at_found )
{
$rval=0;
}
return($rval);
}
?>

Te lo explicaria pero ya medio un chingo de hueva así que mejor si quieres saber que dice todo ese desmadre escrbeme al mail..

[email protected]

Nos vemos...