$sheader="From:".$sfrom."\nReply-To:".$sfrom."\n";
$sheader="From: NOMBRE <".$sfrom.">\nReply-To:".$sfrom."\n";