'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); ?>
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 "
    \n" ; echo "
    \n" ; echo ""; echo ""; $Res=$Clase->Query($Sql); if($Clase->NumeroReg($Res)!=0) { $i=0; $Swtsep=''; while($Row=$Clase->Fetch($Res)) { $i++; if( $i==1 )//Separadores pricipal { $Sep=''; $Sep=valor_tabla("emails_forms_separadores","Fieldset","Id_form='".$Id_form."' AND Id_caracteristica='0'",0); $Sep2=valor_tabla("emails_forms_separadores","Texto","Id_form='".$Id_form."' AND Id_caracteristica='0'",0); if( !empty($Sep) ) { echo "
    "; echo "".$Sep.""; echo "
    ".$Sep2."
    \n"; $Swtsep=1; } } $Adjuntos=0; $Row["Nombre"]=quitaracentos($Row["Nombre"]); echo "
    \n"; echo "
    ".$Row["Descripcion"]."".(($Row["Obligatorio"]==1)?" (*)":"")."
    "; if($Row["Tipo"] == 1 || $Row["Tipo"] == 4 )//text + Email { echo ""; } if($Row["Tipo"] == 2 )//textarea { echo "
    "; } if($Row["Tipo"] == 3 )//fecha { if(empty($_POST["Dia$Row[Id_caracteristica]"]) || !is_numeric($_POST["Dia$Row[Id_caracteristica]"])) $_POST["Dia$Row[Id_caracteristica]"]=date('d'); if(empty($_POST["Mes$Row[Id_caracteristica]"]) || !is_numeric($_POST["Mes$Row[Id_caracteristica]"])) $_POST["Mes$Row[Id_caracteristica]"]=date('m'); if(empty($_POST["Ano$Row[Id_caracteristica]"]) || !is_numeric($_POST["Ano$Row[Id_caracteristica]"])) $_POST["Ano$Row[Id_caracteristica]"]=date('Y'); echo ""; } if($Row["Tipo"] == 5 )//Select { echo ""; } if($Row["Tipo"] == 6 )//Checkbox { echo ""; } if($Row["Tipo"] == 7 )//Radio { echo ""; } //Separadores $Sep=""; $Sep2=""; $Sep=valor_tabla("emails_forms_separadores","Fieldset","Id_form='".$Id_form."' AND Id_caracteristica='".$Row["Id_caracteristica"]."'",0); $Sep2=valor_tabla("emails_forms_separadores","Texto","Id_form='".$Id_form."' AND Id_caracteristica='".$Row["Id_caracteristica"]."'",0); if( !empty($Sep) ) { if(!empty($Swtsep)) echo "
    "; echo "
    "; echo "".$Sep.""; $Swtsep=1; } } if(!empty($Swtsep)) echo "
    "; if( $Adjuntos == '1' ) { echo "
    ".$Textos_idiomas[25].":
    "; echo ""; echo "

    \n"; } } if($Tipo == 2) { //Para los emails $Sql=" SELECT c.Email, c.Texto_ref FROM emails_forms as a inner join emails_forms_mails as b on b.Id_form=a.Id_form inner join emails as c on c.Id_email=b.Id_email WHERE b.Id_form='".$Id_form."' and b.Tipo_asignacion='1' and a.Estado='1' ORDER BY b.Orden,c.Id_email,c.Texto_ref "; $Res=$Clase->Query($Sql); if($Clase->NumeroReg($Res)!=0) { echo "
    ".$Textos_idiomas[26].":
    "; echo ""; echo"

    \n"; } } //echo "
    \n" ; echo "
    \n"; echo "
    "; echo " "; echo ""; echo "
    "; /** RECAPTCHA */ echo "
    "; echo "
    "; echo ""; // echo "
    "; echo ""; echo "
    "; echo "
    "; echo "
    "; echo "
    "; /** RECAPTCHA */ echo "


    "; echo "


    "; echo "


    "; echo "
    \n"; echo "\n" ; echo "
    \n"; echo "\n" ; echo "
    "; } function quitaracentos($cadena) { $cadena= eregi_replace('á','a',$cadena); $cadena= eregi_replace('é','e',$cadena); $cadena= eregi_replace('í','i',$cadena); $cadena= eregi_replace('ó','o',$cadena); $cadena= eregi_replace('ú','u',$cadena); $cadena= eregi_replace('Á','A',$cadena); $cadena= eregi_replace('É','E',$cadena); $cadena= eregi_replace('Í','I',$cadena); $cadena= eregi_replace('Ó','O',$cadena); $cadena= eregi_replace('Ú','U',$cadena); return $cadena; } function sendmail($_0,$_1,$_2,$_3,$_4='',$_5='',$_6='',$_7='',$_8='',$Pr='') { if(!$_7)$_7="html"; if(!$_8)$_8=Array(); $_B=''; $_C=''; while(list($_9,$_A)=each($_8)) { if($_8[$_9]['size']!=0) { if(!$_8[$_9]['data'])$_8[$_9]['data']=fread(fopen($_8[$_9]['tmp_name'], "r"),$_8[$_9]['size']); $_B.="X-attachments: ".$_8[$_9]['name']."\n"; $_C.="\n--".$_SERVER["SERVER_NAME"]."\n"; $_C.="Content-type: ".$_8[$_9]['type']."; name=\"".$_8[$_9]['name']."\"\n"; $_C.="Content-Transfer-Encoding: BASE64\n"; $_C.="Content-disposition: attachment; filename=\"".$_8[$_9]['name']."\"\n\n"; $_C.=chunk_split(base64_encode($_8[$_9]['data']))."\n"; } } $_D ="From: ".$_2."\n"; if( !empty($_4) && is_array($_4) && sizeof($_4)>0 ) { foreach( $_4 as $Value) { $_D.="CC: ".$Value."\n"; } } if( !empty($_5) && is_array($_5) && sizeof($_5)>0 ) { foreach( $_5 as $Value) { $_D.="BCC: ".$Value."\n"; } } if($_6)$_D.="Reply-To: ".$_6."\n"; //$_D.="X-Priority: 1\n"; $_D.="X-MSMail-Priority: ".$Pr."\n"; $_D.="X-Mailer:PHP/".phpversion()."\n"; $_D.="Return-Path: root\n"; $_D.="MIME-version: 1.0\n"; $_D.="Content-type: multipart/mixed; "; $_D.="boundary=\"".$_SERVER["SERVER_NAME"]."\"\n"; $_D.="Content-transfer-encoding: 7BIT\n".$_B; $_E ="--".$_SERVER["SERVER_NAME"]."\n"; $_E.="Content-type: text/".$_7."; charset=iso-8859-1\n"; $_E.="Content-transfer-encoding: 7BIT\n"; $_E.="Content-description:Cuerpo de Mensaje\n\n"; $_F =$_E.$_1; $_F.="\n\n".$_C; $_F.="--".$_SERVER["SERVER_NAME"]."--\n"; if(mail($_3,$_0,$_F,$_D)) return(true); return (false); } terminar("categoria"); ?>