require ($_SERVER["DOCUMENT_ROOT"]."/funciones.php");
$SECRETKEY_RECAPTCHA = "6Lf8jzIUAAAAAHYS1Z82wPlvL5yZgHUopl76FlqR";
$Public_key = "6Lf8jzIUAAAAAK0Q-4NbE8V4AvXqmM9uzPe2OAxq";
cabecera();
$Clase = new Sql;
$Fecha_visualizacion=date("Y-m-d");
//Sacamos los banners para esa posicion en esa estructura
$Sql=" SELECT
distinct a.Id_contenido,
a.Id_padre,
a.Titulo,
a.Subtitulo,
DATE_FORMAT(a.Fecha_ini,'%d/%m/%Y') as Fecha,
a.Texto,
a.Url,
a.Imagen,
a.Documentos,
a.Multimedia,
a.Rss,
c.Id_estructura,
e.Titulo as Titulo_estructura
FROM
contenidos as a
inner join contenidos_usuarios as b on a.Id_contenido=b.Id_contenido
inner join estructura_contenidos as c on a.Id_contenido=c.Id_contenido
inner join gestor_estructura as d on c.Id_estructura=d.Id_estructura
inner join idioma_estructura as e on d.Id_estructura=e.Id_estructura
left join contenidos_caducidad_estados as z on z.Id_contenido=a.Id_contenido
WHERE
a.Id_contenido='119'
and a.Activo!='0'
and a.Activo='1'
and a.Id_idioma='1'
and ( (a.Fecha_ini<='".$Fecha_visualizacion."') and (a.Fecha_ini<>'0000-00-00') )
and d.Web='1'
and e.Activo='1'
and e.Id_idioma='1'
and ( a.Fecha_fin>'".$Fecha_visualizacion."' or a.Fecha_fin='0000-00-00' or a.Fecha_fin IS NULL or z.Id_estado='2' )
and c.Id_estructura='232'
LIMIT
0,1
";
$Res=$Clase->Query($Sql);
$Row=$Clase->Fetch($Res);
?>
$Enviado= "";
$Txt_idiomas = @array_map('rtrim',file($_SERVER["DOCUMENT_ROOT"]."/es.txt"));
array_unshift($Txt_idiomas, "");
$Textos_idiomas = $Txt_idiomas;
if(!empty($_POST["Accion"]) && $_POST["Accion"] == "Ok")
{
unset($Error);
if(!is_numeric($_POST["Id_form"]))
{
exit;
}
$Sql = "SELECT
Titulo,
Titulo_contenido,
Asunto,
Tipo,
Tipo_envio,
Texto_mail,
Prioridad,
Remite,
Adjuntos,
Registro
FROM
emails_forms
WHERE
Id_form='".$_POST["Id_form"]."'
and Estado='1'
";
$Res=$Clase->Query($Sql);
if($Clase->NumeroReg($Res)==0)
{
exit;
}
else
{
$Row=$Clase->Fetch($Res);
$Titulo=$Row["Titulo"];
$Titulo_contenido=$Row["Titulo_contenido"];
$Asunto=$Row["Asunto"];
$Remite=$Row["Remite"];
$Tipo=$Row["Tipo"];
$Tipo_envio=$Row["Tipo_envio"];
$Texto_mail=$Row["Texto_mail"];
$Adjuntos=0;
$Registro=$Row["Registro"];
$Prioridad=$Row["Prioridad"];
}
//comprobar los obligatorios
$Sql = "SELECT
a.Id_form,
a.Obligatorio,
a.Visible_mail,
b.Id_caracteristica,
b.Nombre,
b.Tipo,
c.Descripcion
FROM
emails_forms_caracteristicas as a
inner join emails_caracteristicas as b on b.Id_caracteristica=a.Id_caracteristica
inner join emails_caracteristicas_idioma as c on b.Id_caracteristica=c.Id_caracteristica
WHERE
a.Id_form='".$_POST["Id_form"]."'
and c.Id_idioma='1'
ORDER BY
a.Orden
";
$Res=$Clase->Query($Sql);
if($Clase->NumeroReg($Res)!=0)
{
while($Row=$Clase->Fetch($Res))
{
$Nombre=$Row["Nombre"];
$Row["Nombre"]=quitaracentos($Row["Nombre"]);
if( $Row["Obligatorio"] == 1 )
{
if(empty($_POST[$Row["Nombre"]]) && $Row["Tipo"] != '3')
{
$Error[]="
".$Row["Descripcion"].": ".$Textos_idiomas[16];
}
else
{
if( $Row["Tipo"] == '3' and !checkdate($_POST["Mes$Row[Id_caracteristica]"],$_POST["Dia$Row[Id_caracteristica]"],$_POST["Ano$Row[Id_caracteristica]"]) )
{
$Error[]=$Row["Descripcion"].": ".$Textos_idiomas[17];
}
else if( $Row["Tipo"] == '4' && !ereg('^[a-z0-9]+([\.]?[a-z0-9_-]+)*@'.'[a-z0-9]+([\.-]+[a-z0-9]+)*\.[a-z]{2,}$',$_POST[$Row["Nombre"]]) )
{
$Error[]=$Row["Descripcion"].": ".$Textos_idiomas[17];
}
}
}
if( !empty($_POST[$Row["Nombre"]]) )
{
if(!is_array($_POST[$Row["Nombre"]]))
$_POST[$Row["Nombre"]]=addslashes(strip_tags($_POST[$Row["Nombre"]]));
else
foreach($_POST[$Row["Nombre"]] as $Key=>$Value )
$_POST[$Row["Nombre"]][$Key]=addslashes(strip_tags($Value));
}
}
}
// RECAPTCHA
if (!isset($_POST["g-recaptcha-response"]) || empty($_POST["g-recaptcha-response"]))
{$Error[]="Captcha incorrecto";}
else{
$captcha=$_POST['g-recaptcha-response'];
$response=file_get_contents("https://www.google.com/recaptcha/api/siteverify?secret=".$SECRETKEY_RECAPTCHA."&response=".$captcha."&remoteip=".$_SERVER['REMOTE_ADDR']);
if(json_decode($response)->success==false)
{$Error[]="Captcha no validado";}
}
if( !empty($_POST["Email_envio"]) && $_POST["Email_envio"]==-1 )
$Error[]=$Textos_idiomas[49];
//if( empty($_POST["Aviso_legal"]) || $_POST["Aviso_legal"]!=1 )
// $Error[]=$Textos_idiomas[37]." ".$Textos_idiomas[38];
$Adjuntos_fin = 0;
if( $Adjuntos == 1 )
{
$Adjuntos_fin = 0;
if( !empty($_FILES["Archivo"]["tmp_name"]) )
{
$Archivo = $_FILES["Archivo"]["tmp_name"];
$Adjuntos_fin = 1;
If( !is_uploaded_file($_FILES["Archivo"]["tmp_name"]) )
{
$Error[]= $Textos_idiomas[18];
}
Else
{
$Extension = strtolower(Substr($_FILES["Archivo"]["name"],-3,3));
If( $_FILES["Archivo"]["size"]>2000000 ) $Error[]=$Textos_idiomas[19];
$_FILES["Archivo"]["name"] = ereg_replace("[^A-Za-z0-9. ]", "", $_FILES["Archivo"]["name"]);
$_FILES["Archivo"]["name"]=str_replace(" ", "-", $_FILES["Archivo"]["name"]);
If(!in_array(strtolower($_FILES["Archivo"]["type"]),$_MIMES_VALIDOS_DOC))
$Error[]=$Textos_idiomas[21].": (".implode(",",$_EXTENSIONES_MIMES_DOC).")";
}
}
}
if(empty($Error))
{
srand((double) microtime() * 1000000);
$Aleatorio=@rand(10000000,99999999);
$Sig=$Clase->P_auto("emails_registro");
$Nombre_meses = Array(1 => "Ene", "Feb", "Mar", "Abr", "May", "Jun", "Jul", "Ago", "Sep", "Oct", "Nov", "Dic");
require($_SERVER["DOCUMENT_ROOT"]."/generico/funciones_mail.php");
$mensac="
\n";
$Clase->Mover($Res);
if($Clase->NumeroReg($Res)!=0)
{
if( !empty($Titulo_contenido) && $Titulo_contenido==1)
{
$mensac.= "
\n";
$mensac.= $Arr_titulo[0];
$mensac.= "
\n";
$mensac.= "
\n";
}
$mensac.=$Texto_mail;
while($Row=$Clase->Fetch($Res))
{
if($Row["Visible_mail"]==1)
{
$Nombre=$Row["Nombre"];
if(!empty($Row["Nombre"]))
$Row["Nombre"]=quitaracentos($Row["Nombre"]);
if( !empty($_POST[$Row["Nombre"]]) || $Row["Tipo"] == 3 )
{
if( $Row["Tipo"] == '2' )//textarea
{
$_POST[$Row["Nombre"]]=str_replace("\n","
",$_POST[$Row["Nombre"]]);
}
else if( $Row["Tipo"] == '3' )//fecha
{
$_POST[$Row["Nombre"]]=floor($_POST["Dia$Row[Id_caracteristica]"])."-".$Nombre_meses[floor($_POST["Mes$Row[Id_caracteristica]"])]."-".floor($_POST["Ano$Row[Id_caracteristica]"]);
}
else if( $Row["Tipo"] == '6' )//checkbox
{
$_POST[$Row["Nombre"]]=implode("/",$_POST[$Row["Nombre"]]);
}
$mensac.="".$Row["Descripcion"].": ".$_POST[$Row["Nombre"]]."
\n";
}
}
if( !empty($Texto_mail) )
{
$mensac=str_replace("{{".$Row["Nombre"]."}}",$_POST[$Row["Nombre"]],$mensac);
}
}
}
$mensac.="
\n";
unset($mensa);
$mensa=cabecera_mail($Titulo).$mensac.pie_mail();
$Total = $mensa;
if($Tipo==2)
{
$Emails[]=$_POST["Suemail"];
}
else if($Tipo_envio == 1)
{
$Sql=" SELECT
b.Email,
b.Texto_ref
FROM
emails_forms_mails as a
inner join emails as b on b.Id_email=a.Id_email
WHERE
a.Id_form='".$_POST["Id_form"]."'
and a.Tipo_asignacion = '1'
";
$Res=$Clase->Query($Sql);
if($Clase->NumeroReg($Res)!=0)
{
while($Row=$Clase->Fetch($Res))
{
$Emails[]=$Row["Email"];
}
}
}
else if($Tipo_envio == 2)
$Emails[]=$_POST["Email_envio"];
if( !empty($_POST["Email"]) && ereg('^[a-z0-9]+([\.]?[a-z0-9_-]+)*@'.'[a-z0-9]+([\.-]+[a-z0-9]+)*\.[a-z]{2,}$',$_POST["Email"]) )
$Replay= $_POST["Email"];
else
$Replay= "";
$Cabeceras="From:".$Remite."\nX-Mailer:PHP/".phpversion()."\nMime-Version: 1.0\nContent-type: text/html;\nReply-To:$Replay\nContent-Transfer-Encoding: base64\n";
$Cc=array();
$Bcc=array();
$Res=$Clase->Query("select a.Id_email,a.Tipo_asignacion,Email from emails_forms_mails as a inner join emails as b on a.Id_email=b.Id_email where a.Id_form='".$_POST["Id_form"]."' and a.Tipo_asignacion!='1'");
while($Row=$Clase->Fetch($Res))
{
if($Row["Tipo_asignacion"]==2)
$Cc[]=$Row["Email"];
else if($Row["Tipo_asignacion"]==3)
$Bcc[]=$Row["Email"];
}
foreach($Emails as $Value)
{
If(ereg('^[a-z0-9]+([\.]?[a-z0-9_-]+)*@'.'[a-z0-9]+([\.-]+[a-z0-9]+)*\.[a-z]{2,}$',$Value))
{
/***** NUEVO ******/
$From_name="";
$Replay_titulo="";
$Cc="";
$Bcc="";
$Adjuntos="";
$Replay = $Remite;
if (envio_correo($Value,$From,$From_name,$Replay,$Replay_titulo,$Cc,$Bcc,$Adjuntos,$Asunto,$Total))
/***** FIN NUEVO ****/
//if(sendmail($Asunto,$Total,$Remite,$Value,$Cc,$Bcc,$Replay,'',$_FILES,$Prioridad))
{
$Enviado="ok";
if (!empty($_SERVER["HTTP_X_FORWARDED_FOR"]))
{
$Ip=$_SERVER["HTTP_X_FORWARDED_FOR"];
}
else
{
$Ip=$_SERVER["REMOTE_ADDR"];
}
if( (int)$Registro == 1 )
{
$Id_form=addslashes($_REQUEST["Id_form"]);
$Value=addslashes($Value);
$Titulo=addslashes($Titulo);
$Asunto=addslashes($Asunto);
$Remite=addslashes($Remite);
$Sql="INSERT into emails_registro (Id_estructura,Id_form,Email,Titulo,Asunto,Remite,Fecha,Hora,Ip,Contenido,Adjuntos,Destacado,Activo,Codigo,Id_usuario) VALUES ('"._ESTRUCTURA."','".$Id_form."','".$Value."','".$Titulo."','".$Asunto."','".$Remite."',Now(),Now(),'".$Ip."','".$mensac."','".$Adjuntos_fin."','0','0','".$Aleatorio."','".$_SESSION["Sess_w_id_usuario"]."')";
$Clase->Query($Sql);
$Id_ultimo=$Clase->UltimoId();
if( (int)$Adjuntos_fin == 1 )
{
$Sql="INSERT INTO emails_adjuntos (Id_registro,Id_form,Nombre_archivo,Tipo,Size) values ('".$Id_ultimo."','".$Id_form."','".$_FILES["Archivo"]["name"]."','".$_FILES["Archivo"]["type"]."','".$_FILES["Archivo"]["size"]."')";
$Clase->Query($Sql);
copy($Archivo, $Destino.$Sig."_".$Aleatorio."_".$_FILES["Archivo"]["name"]);
}
}
}
else
{
$Error[]="
".$Textos_idiomas[22]."";
}
}
}
}
}
$IdEstContacto = dime_id_estructura("contacta");
$Sql=" SELECT
a.Id_form,
a.Titulo,
a.Visible_titulo,
a.Remite,
a.Asunto,
a.Tipo,
a.Tipo_envio
FROM
emails_forms as a
inner join emails_forms_estructura as b on b.Id_form=a.Id_form
WHERE
b.Id_estructura='".$IdEstContacto."'
and a.Estado='1'
";
$Res=$Clase->Query($Sql);
if( $Clase->NumeroReg($Res)=='1' )
{
$Row=$Clase->Fetch($Res);
$Id_form=$Row["Id_form"];
$Titulo=$Row["Titulo"];
$Visible_titulo=$Row["Visible_titulo"];
$Tipo=$Row["Tipo"];
$Tipo=$Row["Tipo_envio"];
//echo "
\n";
if($Visible_titulo == '1')
{
echo "
".$Titulo."
\n";
}
if(!empty($Error))
{
echo "
\n";
foreach($Error as $v=>$k){
echo "
\n";
echo $k;
echo "
\n";
echo "
\n";
}
echo "
\n";
}
echo "
\n";
if ($Enviado=="ok")
{
echo"
";
echo "".$Textos_idiomas[23]." ".$_SERVER["SERVER_NAME"];
echo "
";
}
$Sql="
SELECT
a.Id_form,
a.Titulo,
a.Visible_titulo,
a.Adjuntos,
b.Obligatorio,
c.Id_caracteristica,
c.Nombre,
c.Tipo,
d.Descripcion
FROM
emails_forms as a
inner join emails_forms_caracteristicas as b on b.Id_form=a.Id_form
inner join emails_caracteristicas as c on c.Id_caracteristica=b.Id_caracteristica
inner join emails_caracteristicas_idioma as d on c.Id_caracteristica=d.Id_caracteristica
WHERE
a.Id_form='".$Id_form."'
and a.Estado='1'
and d.Id_idioma='1'
ORDER by
b.Orden
";
$estilo="";
echo "