Necesito que al llenar un formulario html se envie a una casilla de mail en particular y ademas escriba los datos del form en un .xls
Tengo los codigos para realizar las cosas por separado, o envio un mail o escribo en .xls
Pero seguramente de alguna manera se pueda vincular los dos php o MEJOR juntarlos y que un mismo script realice las dos cosas.
Por un lado tengo este script. (Envia el email)
Código PHP:
if(isset($_POST['Enviar'])){
if (getenv("HTTP_X_FORWARDED_FOR")){
$ip = getenv("HTTP_X_FORWARDED_FOR");
$client = gethostbyaddr($_SERVER['HTTP_X_FORWARDED_FOR']);
} else {
$ip = getenv("REMOTE_ADDR");
$client = gethostbyaddr($_SERVER['REMOTE_ADDR']);
}
$str = preg_split("/\./", $client);
$i = count($str);
$x = $i - 1;
$n = $i - 2;
$isp = $str[$n] . "." . $str[$x];
$contacto = $_POST['Enviar'];
$nombre = $_POST['nombre'];
$mail = $_POST['email'];
$empresa = $_POST['empresa'];
$telefono = $_POST['telefono'];
$web = $_POST['web'];
$header = 'From: ' . $mail . " \r\n";
$header .= "X-Mailer: PHP/" . phpversion() . " \r\n";
$header .= "Mime-Version: 1.0 \r\n";
$header .= "Content-Type: text/plain;";
$mensaje = "Este mensaje fue enviado por " . $nombre . ", de la empresa " . $empresa . " \r\n";
$mensaje .= " // Su e-mail es: " . $mail . " \r\n";
$mensaje .= " // Su telefono es: " . $telefono . " \r\n";
$mensaje .= " // Su web es: " . $web . " \r\n";
$mensaje .= " // Mensaje: " . $_POST['mensaje'] . " \r\n";
$mensaje .= " // Enviado el " . date('d/m/Y', time()) . " \r\n";
$mensaje .= " // IP: " . $REMOTE_ADDR . ", ISP: " . $isp . "\r\n";
$para = 'email';
$asunto = 'Contacto desde la web';
mail($para, $asunto, $mensaje, $header);
echo '<p color="#336699"><b><font color="#336699">Enviado correctamente.</font></p></b>';
}
Código PHP:
$success = "ok";
$error = "error";
$lbChar = "new line";
if($_POST){
$array = $_POST;
} else if($_GET){
$array = $_GET;
} else {
die("You must Access this file through a form.");
}
if(!$array['filename']){
$array['filename'] = "form.xls";
} else {
if(!(stristr($array['filename'],".xls"))){
$array['filename'] = $array['filename'] . ".xls";
}
}
$tab = "\t"; //chr(9);
$cr = "\n"; //chr(13);
if($array){
$keys = array_keys($array);
foreach($keys as $key){
if(strtolower($key) != 'filename' && strtolower($key) != 'title'){
$header .= $key . $tab;
}
}
$header .= $cr;
//Make the line with the contents to write to the excel file.
foreach($keys as $key){
if(strtolower($key) != 'filename' && strtolower($key) != 'title'){
$array[$key] = str_replace("\n",$lbChar,$array[$key]);
$array[$key] = preg_replace('/([\r\n])/e',"ord('$1')==10?'':''",$array[$key]);
$array[$key] = str_replace("\\","",$array[$key]);
$array[$key] = str_replace($tab, " ", $array[$key]);
$data .= $array[$key] . $tab ;
}
}
$data .= $cr;
if (file_exists($array['filename'])) {
$final_data = $data;
} else {
$final_data = $header . $data;
}
// open the file and write to it
$fp = fopen($array['filename'],"a");
if($fp){
fwrite($fp,$final_data);
fclose($fp);
// Success
header("Location: $success");
} else {
// Error
header("Location: $error");
}
}

Saludos.