query("SET NAMES 'utf8'"); //VARIABLES---------------------------------------------------------------------------------------------------------- //USER $user = ""; $user = $_SESSION["user"]; //GRUPO $grupo = ""; $grupo = $_SESSION["grupo"]; //ordenador $ordenador = $_SESSION['host']; //ID DOC $id = "20".$_POST['id']; //FECHA CADUCIDAD $fch_cad = $_POST['fch']; //TIPO DESCARGA O VISUALIZAR $tipo = $_POST['tipo']; //SI EL VINCULO ES DESTRUIBLE $del = $_POST['del']; //SI SE SOLICITA CONFIRMACION $confirmar = $_POST['conf']; //SI SE VA A GENERAR CLAVE DE DESCARGA $clave = $_POST['clave']; //Ver si se utiliza mail propio para la salida $own_mail = $_POST['own_mail']; //Variable de la plantilla de justificante a utilizar $plant_just2 = $_POST['just']; $plant_just = claveJustificante($bd, $plant_just2); //$url = $_POST['url_desc']; //PARA $para = $_POST['para']; //ASUNTO $asunto = utf8_decode($_POST['asunto']); //NOMBRE A MOSTRAR $nomb_mostrar = utf8_decode($_SESSION["mostrar"]); //========================================================================================== //===============HAGO EL UPDATE DE LAS PREFERENCIAS DE ENVIO DEL USUARIO==================== updatePreferenciasUsuario($bd, $user, $asunto, $confirmar, $clave); //========================================================================================== //===============================OBTENGO LOS DATOS DEL DOCUMENTO============================ //Obtencion Datos del Doc------------------------------------------------------------ $datos_doc = datosDocs($id); $ambito_doc = $datos_doc['AMBITO']; $acceso_doc = $datos_doc['ACCESO'].$datos_doc['ACCESO_AUTO']; $tamano_doc = $datos_doc['TAMANO']; $nombre_doc = $datos_doc['NOMBRE']; $nombre_doc = utf8_decode($nombre_doc); $padre_doc = $datos_doc['PADRE']; //AÑADO LA HORA ACTUAL A LA FECHA DE CADUCIDAD $hora = date("H:i:s"); //ARMO LA VARIABLE DE CADUCIDAD $caduca = $fch_cad." ".$hora; //========================================================================================== //========================================================================================== //===============================CARGO LA RUTA A USAR PARA EL LOGOTIPO====================== //========================================================================================== //CARGO EL DOMINIO $dominio = dominioCliente($bd); //oBTENGO LA URL DEL LOGO A USAR $logo = logoCorreos($bd); //========================================================================================== //===============================DATOS DEL SERVIDOR SMTP==================================== //========================================================================================== //OBTENGO LA DIRECCION DE CORREO ASIGANADA PARA LA SALIDA----------------------------------- $mail_sistema = correoSistema($bd); //Obtengo los datos del correo de sistema--------------------------------------------------- $datosMail = datosMail($bd, $mail_sistema); //VARIABLES $host = $datosMail['SERVIDOR_SALIENTE']; $usuario_mail = $datosMail['CUENTA']; $clave_mail = $datosMail['CLAVE']; $autent = $datosMail['AUT_SALIENTE']; $puerto = $datosMail['PUERTO_SALIENTE']; $descripcion = $datosMail['DESCRIPCION']; //VALIDO QUE EL CAMPO MOSTRAR SEA UNA DIRECCION DE CORREO VALIDA---------------------------- //DE LOS CONTRARIO UTILIZO LA CUENTA DE MAIL DEL SISTEMA------------------------------------ if ($own_mail == 0) { $mailAmostrar = $datosMail['MOSTRAR']; if (filter_var($mailAmostrar, FILTER_VALIDATE_EMAIL)) { $mailAmostrar = $datosMail['MOSTRAR']; }else{ $mailAmostrar = $datosMail['CUENTA']; } }elseif ($own_mail == 1) { $datosMailUser = datosMailUser($bd, $user); $mailAmostrar = $datosMailUser['CORREO']; } //========================================================================================== //===============================CORREO ELECTRONICO========================================= //========================================================================================== //LIBRERIA---------------------------------------------------------------------------------- require '../../recursos/phpmailer/PHPMailerAutoload.php'; //===================================================================================================================================== //===============================BLOQUE CORREO NOTIFICACION AL EMISOR================================================================== //===================================================================================================================================== //Valido que el emisor del mail tenga correo asignado $mail_emisor = correoEmisor($bd, $user); //DE TENER CORREO CONFIGURADO SE LO MANDO DE LO CONTRARIO NO HAGO NADA------------------------- if ($mail_emisor != '') { //========================================================================================== //===============================CARGO LA RUTA A USAR PARA EL LOGOTIPO====================== //========================================================================================== //CARGO EL DOMINIO $dominio = dominioCliente($bd); $logo = logoCorreos($bd); //CREO LA NUEVA VRIABLE--------------------------------------------------------------------- $mail = new PHPMailer; //PARAMETROS-------------------------------------------------------------------------------- // VALIDO LA VRIABLE COMO SMTP $mail->isSMTP(); //VALIDO EL IDIOMA A USAR $mail->SetLanguage('es'); // SERVIDOR DE SMTP $mail->Host = $host; //HABILITO LA AUTENTICACION SMTP----------------------------------------------------------- if ($autent == 1) { //REQUIERE AUTENTICACIÓN $mail->SMTPAuth = true; }else{ //NO LA REQUIERE $mail->SMTPAuth = false; } //USER DEL SERVIDOR SMTP------------------------------------------------------------------- $mail->Username = $usuario_mail; //PASSWORD DEL CLIENTE DEL SERVIDOR SMTP $mail->Password = $clave_mail; //TIPO DE SEGURIDAD------------------------------------------------------------------------- $mail->SMTPSecure = 'tls'; //PUERTO DE ENVIO DEL CORREO---------------------------------------------------------------- $mail->Port = $puerto; //VALIDO LA CONEXION COMO INSEGURA --------------------------------------------------------- $mail->SMTPOptions = array( 'ssl' => array( 'verify_peer' => false, 'verify_peer_name' => false, 'allow_self_signed' => true ) ); //======================================================================================== //DATOS DEL QUE ENVIA EL CORREO----------------------------------------------------------- //======================================================================================== //CORREO A MOSTRAR DEL REMITENTE---------------------------------------------------------- //VALIDO UNA CUENTA GENERICA NOREPLY CON DOMINIO DEL USUARIO if ($mailAmostrar != '') { $mail->setFrom($mailAmostrar, $descripcion); }else{ $mail->setFrom("noreply@avanbox.com", $descripcion); } //========================================================================================= //============================CORREO PARA ENVIAR AVISO AL EMISOR=========================== $mail->addAddress($mail_emisor); //========================================================================================= //ENVIAR EL CORREO CON FORMATO HTML-------------------------------------------------------- $mail->isHTML(true); //========================================================================================= //ARMO CUERPO DEL CORREO------------------------------------------------------------------- //========================================================================================= //HTML DEL BODY DEL CORREO------------------------------------------------------------------ $bodyContent = "
AVANBOX logo


".F_MSG_MAIL_HOLA." ".$nomb_mostrar.",

".F_MSG_MAIL_HAS_COMP.": ".$nombre_doc."

con : ".$para."

".F_MSG_CAD." ".$caduca."


Mensaje generado por AvanBox. No responda a este correo electrónico.

"; //========================================================================================= //ARMO CUERPO DEL CORREO EN TEXTO PLANO---------------------------------------------------- $bodyContentText = $nomb_mostrar; $bodyContentText .= F_MSG_MAIL_HAS_COMP; $bodyContentText .= $nombre_doc."
"; //----------------------------------------------------------------------------------------- //ASUNTO------------------------------------------------------------------------------------ //COLOCO EL ASUNTO PREDEFINIDO $mail->Subject = F_MSG_MAIL_HAS_COMP." ".$nombre_doc; //CARGO EL CUERPO DEL CORREO---------------------------------------------------------------- //$mail->msgHTML(file_get_contents($bodyContent), dirname(__FILE__)); $mail->msgHTML($bodyContent); //CARGO EL CUERPO DEL CORREO EN TEXTO PLANO------------------------------------------------ $mail->AltBody = $bodyContentText; //DATOS ADJUNTOS--------------------------------------------------------------------------- //$mail->addAttachment('recursos/img/logo.png'); //ENVIO DEL MAIL--------------------------------------------------------------------------- $mail->send(); } //===================================================================================================================================== //===============================BLOQUE CORREO DESTINATARIOS=========================================================================== //===================================================================================================================================== //HAGO EL EXPLDOE DE LA CADENA DE CORREO $array_para = explode(";", $para); //CUENTO LA CANT DE REGISTROS DEL ARRAY $total_para = count($array_para); //--------------------------------------------------------------------------------------------- //RECORRO EL ARRAY Y CARGO LOS DESTINATARIOS--------------------------------------------------- for($i=0;$i<$total_para;$i++){ //----------------------------------------------------------------------------------------- //===========================BLOQUE PARA GENERAR EL VINCULO================================ //----------------------------------------------------------------------------------------- //GENERAR LA CLAVE DE 18 DIGITOS PARA EL CODIGO DEL VINCULO-------------------------------- $clv_vinculo = getUnico(); //EVALUO SI SE SOLICITO GENERAR CLAVE PARA EL DOCUMENTO if ($clave==1) { //CLAVE ALEATORIA $clave_desc2 = rand( 1001, 9999 ); //ENCRIPTO LA CLAVE $clave_desc = sha1($clave_desc2); //Armo el mensaje de contraseña $contrasena = F_MSG_MAIL_CLAVE.". = ".$clave_desc2; }else{ //SIN CLAVE $contrasena = ""; //SIN CLAVE $clave_desc2 = 0; //ENCRIPTO LA CLAVE $clave_desc = sha1($clave_desc2); } //EVALUO SI SE SOLICITO CONFIRMACION PARA EL DOCUMENTO if ($confirmar==1) { //Armo el mensaje para mostrar la solicitud de confirmacion $req_confirm = F_MSG_REQ_CONFIM; //Cargo la variable con el nombre de la plantilla del justificante a utilizar $justificante = $plant_just; }else{ //SIN CLAVE $req_confirm = ""; //No lleva justificante de aceptacion $justificante = ""; } //Variable del correo del destinatario $mail_destinatario = $array_para[$i]; //Contacto destinatario $contact_dest = idContactoReceptor($bd, $mail_destinatario); if ($contact_dest == "") { //No se encontro relacionado a un contacto y lo coloco en 0 $id_contacto = 0; }elseif ($contact_dest != "") { //ESta relaciona a un contacto $id_contacto = $contact_dest; } //REALIZO EL INSERT EN LA TABLA DE BIBLIOTECA_VINCULOS insertVinculo($bd, $clv_vinculo, $id, $tipo, $del, $clave_desc, $caduca, $mail_destinatario, $confirmar, $id_contacto, $justificante); //========================================================================================= //REalizo el asiento en la biblioreca de historial----------------------------------------- //=================================================================================== //==============Registro del historial de traza====================================== //variables para registrar la traza-------------------------------------------------- $padre_traza = nombrePadre($bd, $padre_doc); //EVALUO EL TIPO DE TRAZ A DEJAR if ($tipo == 0) { //En la traza permite descarga $accion_trza = 40; //LINK DESCARGA }elseif ($tipo == 1) { //En la traza no permite descarga $accion_trza = 39; //LINK VISUALIZAR } $tipo_traza = "D"; //Tipo documento $awa = 1; //CREO REGISTRO EN EL HISTORIAL------------------------------------------------------ registroHistorial($bd, $id, $user, $ordenador, $nombre_doc, $padre_traza, $ambito_doc, $acceso_doc, $tamano_doc, $awa, $accion_trza, $tipo_traza, $clv_vinculo); //----------------------------------------------------------------------------------------- //===========================BLOQUE PARA ENVIAR CORREO AL DESTINATARIO===================== //----------------------------------------------------------------------------------------- //CREO LA NUEVA VRIABLE-------------------------------------------------------------------- $mail = new PHPMailer; // VALIDO LA VRIABLE COMO SMTP $mail->isSMTP(); //VALIDO EL IDIOMA A USAR $mail->SetLanguage('es'); // SERVIDOR DE SMTP $mail->Host = $host; //HABILITO LA AUTENTICACION SMTP----------------------------------------------------------- if ($autent == 1) { //REQUIERE AUTENTICACIÓN $mail->SMTPAuth = true; }else{ //NO LA REQUIERE $mail->SMTPAuth = false; } //USER DEL SERVIDOR SMTP------------------------------------------------------------------- $mail->Username = $usuario_mail; //PASSWORD DEL CLIENTE DEL SERVIDOR SMTP $mail->Password = $clave_mail; //TIPO DE SEGURIDAD------------------------------------------------------------------------- $mail->SMTPSecure = 'tls'; //PUERTO DE ENVIO DEL CORREO---------------------------------------------------------------- $mail->Port = $puerto; //VALIDO LA CONEXION COMO INSEGURA --------------------------------------------------------- $mail->SMTPOptions = array( 'ssl' => array( 'verify_peer' => false, 'verify_peer_name' => false, 'allow_self_signed' => true ) ); //----------------------------------------------------------------------------------------- //DATOS DEL QUE ENVIA EL CORREO------------------------------------------------------------ //----------------------------------------------------------------------------------------- //CORREO A MOSTRAR DEL REMITENTE---------------------------------------------------------- //VALIDO UNA CUENTA GENERICA NOREPLY CON DOMINIO DEL USUARIO if ($mailAmostrar != '') { $mail->setFrom($mailAmostrar, $descripcion); //$mail->setFrom("laro@avanbox.com", "prueba mails"); }else{ $mail->setFrom("noreply@avanbox.com", $descripcion); } //CARGO LA DIRECCION DE MAIL--------------------------------------------------------------- $mail->addAddress($array_para[$i]); //----------------------------------------------------------------------------------------- //ENVIAR EL CORREO CON FORMATO HTML-------------------------------------------------------- $mail->isHTML(true); //----------------------------------------------------------------------------------------- //ARMO CUERPO DEL CORREO------------------------------------------------------------------- //----------------------------------------------------------------------------------------- //ARMO LA URL DE DESCARGA------------------------------------------------------------------ //OBTENGO EL VALOR DEL DOMINIO DEL AWA $dominio = dominioAWA($bd); //SUFIJO DEL DOMINIO $suf_dominio = "/vtemp.php?id="; //URL FINAL $url = $dominio.$suf_dominio.$clv_vinculo; //HTML DEL BODY DEL CORREO------------------------------------------------------------------ $bodyContent = "
AVANBOX logo


".F_MSG_MAIL_SALUDO.",

".$nomb_mostrar.", ".F_MSG_MAIL_COMPART." ".$req_confirm." :

".$nombre_doc."

".$contrasena."

".F_MSG_CAD." ".$caduca."


Mensaje generado por AvanBox. No responda a este correo electrónico.

"; //----------------------------------------------------------------------------------------- //ARMO CUERPO DEL CORREO EN TEXTO PLANO---------------------------------------------------- $bodyContentText = $nomb_mostrar; $bodyContentText .= F_MSG_ASUNT_COMP; $bodyContentText .= $nombre_doc."
"; $bodyContentText .= $url; //----------------------------------------------------------------------------------------- //ASUNTO------------------------------------------------------------------------------------ //EVALUO SI EL ASUNTO VIENE VACIO if ($asunto != '') { //COLOCO EL ASUNTO COMO LO COLOC EL USUARIO $mail->Subject = $asunto; }else{ //COLOCO EL ASUNTO PREDEFINIDO $asunto_predef = $nomb_mostrar.", ".F_MSG_ASUNT_COMP." ".$nombre_doc." ".F_MSG_ASUNT_WYOU."."; $mail->Subject = $asunto_predef; } //CARGO EL CUERPO DEL CORREO---------------------------------------------------------------- $mail->msgHTML($bodyContent); //CARGO EL CUERPO DEL CORREO EN TEXTO PLANO------------------------------------------------ $mail->AltBody = $bodyContentText; //VALIDACION DEL ENVIO--------------------------------------------------------------- if(!$mail->send()) { $mail_ok = 0; } else { $mail_ok = 1; } } //VALIDO QUE EL COOREO DE SISTEMA SEA VALIDO------------------------------------------------ if (filter_var($usuario_mail, FILTER_VALIDATE_EMAIL)) { }else{ $mail_ok = 2; } //Devuelvo la validacion del envio del mail---------------------------------------------- echo $mail_ok; //======================================================================================= //==================================FUNCIONES============================================ //======================================================================================= function datosMail($bd, $mail_sistema) { $sql = " SELECT C.SERVIDOR_SALIENTE, C.AUT_SALIENTE, C.CUENTA, C.CLAVE, C.DESCRIPCION, C.PUERTO_SALIENTE, C.MOSTRAR FROM CORREO_CUENTAS C WHERE C.CUENTA = '$mail_sistema' AND C.ACTIVA = 1"; $base = $bd->query($sql); $result = mysqli_fetch_array($base); return $result; } function datosMailUser($bd, $user) { $sql = " SELECT U.CORREO FROM USUARIOS U WHERE U.USUARIO = '$user' LIMIT 1"; $base = $bd->query($sql); $result = mysqli_fetch_array($base); return $result; } //FUNCION PARA OBTENER LA DIRECCION DE MAIL DEL SISTEMA--------------------------------- function correoSistema($bd) { $sql = "SELECT P.VALOR FROM PARAMETROS P WHERE P.CODIGO = 'CORREO_SISTEMA'"; $base = $bd->query($sql); $result = mysqli_fetch_array($base); $correo = $result['VALOR']; return $correo; } //obtengo el dominio utilizado------------------------------------------------------------- function dominioCliente($bd) { $sql = " SELECT P.VALOR FROM PARAMETROS P WHERE P.CODIGO = 'AWA_DOMINIO'"; $base = $bd->query($sql); $row = mysqli_fetch_array($base); $dominio = $row['VALOR']; return $dominio; $base->close(); } //FUNCION PARA OBTENER LOS DATOS DEL DOCUMENTO------------------------------------------------ function datosDocs($id_doc){ global $bd; $sql = " SELECT e.CLAVE, e.NOMBRE, e.EXTENSION, e.TAMANO, e.SUFIJO, e.PARTES, e.PADRE, e.AMBITO, e.ACCESO, e.ACCESO_AUTO FROM BIBLIOTECA_ELEMENTOS e WHERE e.CLAVE = '$id_doc'"; $base = $bd->query($sql); $datos = mysqli_fetch_assoc($base); $base->close(); return $datos; } //QRY PARA CONSULTAR EL DOMINIO DEL AWA function dominioAWA($bd) { $sql = "SELECT P.VALOR FROM PARAMETROS P WHERE P.CODIGO = 'AWA_DOMINIO'"; $base = $bd->query($sql); $result = mysqli_fetch_array($base); $base->close(); $dominio = $result["VALOR"]; return $dominio; } //INSERT DE LA TABLA BIBLIOTECA_VINCULOS function insertVinculo($bd, $clv_vinculo, $id, $tipo, $del, $clave_desc, $fch_cad, $mail_destinatario, $confirmar, $id_contacto, $justificante) { $fichero_ok = mysqli_query($bd, " INSERT INTO BIBLIOTECA_VINCULOS ( VINCULO, CLAVE, CADUCIDAD, ACTIVO, TIPO, DESTRUIBLE, CLAVE_DESCARGA, EMAIL, CONFIRMAR, CONTACTO, JUSTIF_DOC ) VALUES ( '$clv_vinculo', '$id', '$fch_cad', 1, $tipo, $del, '$clave_desc', '$mail_destinatario', $confirmar, $id_contacto, '$justificante' )"); } //FUNCION PARA OBTENER LA CLAVE UNICA DE 18 DIGITOS function getUnico() { return date( "YmdHis" ) . sprintf( "%04d", rand( 0, 9999 ) ); } //obtengo el dominio utilizado------------------------------------------------------------- function correoEmisor($bd, $user) { $sql = " SELECT C.EMAIL1 FROM CONTACTOS C INNER JOIN USUARIOS U ON C.CODIGO = U.CONTACTO WHERE U.USUARIO = '$user'"; $base = $bd->query($sql); $row = mysqli_fetch_array($base); $correo_emisor = $row['EMAIL1']; return $correo_emisor; $base->close(); } //obtengo el dominio utilizado------------------------------------------------------------- function idContactoReceptor($bd, $mail_destinatario) { $sql = " SELECT C.CODIGO FROM CONTACTOS C WHERE C.EMAIL1 = '$mail_destinatario' OR C.EMAIL2 = '$mail_destinatario' OR C.EMAIL3 = '$mail_destinatario' OR C.EMAIL4 = '$mail_destinatario' OR C.EMAIL5 = '$mail_destinatario' OR C.EMAIL6 = '$mail_destinatario' LIMIT 1"; $base = $bd->query($sql); $row = mysqli_fetch_array($base); $result = $row['CODIGO']; return $result; $base->close(); } //=============================================================================================================================== //=========================================BLOQUE TRAZA HISTORIAL================================================================ //FUNCION PARA Hacer el Registro en el Historial------------------------------------------------ function registroHistorial($bd, $doc, $user, $ordenador, $nombre, $padre, $ambito, $acceso, $tamano, $awa, $accion, $tipo, $clv_vinculo) { $query =" INSERT INTO BIBLIOTECA_HISTORIAL ( CLAVE, USUARIO, FECHA, ACCION, DOCUMENTO, CARPETA, ORDENADOR, AMBITO, ACCESO, TIPO, TAMANO, CREADOR, AWA, DETALLE) VALUES ( '$doc', '$user', NOW(), $accion, '$nombre', '$padre', '$ordenador', '$ambito', '$acceso', '$tipo', $tamano, '$user', $awa, '$clv_vinculo')"; mysqli_query($bd, $query); } //FUNCION PARA OBTENER EL NOMBRE DEL PADRE DEL DOCUMENTO------------------------------------- function nombrePadre($bd, $id_padre){ //EVALUO SI EL PADRE NO PERTECENE A ALGUN DIRECTORIO RAIZ PUBLICO O PRIVADO if ($id_padre == "##PUBLICO##" OR $id_padre == "##PRIVADO##" OR $id_padre == "##USUARIOS##") { if ($id_padre == "##PUBLICO##") { $padre = "##PUBLICO##"; } if ($id_padre == "##PRIVADO##") { $padre = "##PRIVADO##"; } if ($id_padre == "##USUARIOS##") { $padre = "##USUARIOS##"; } }else{ $sql = " SELECT e.NOMBRE FROM BIBLIOTECA_ELEMENTOS e WHERE e.CLAVE = '$id_padre' AND e.TIPO = 'C' LIMIT 1"; $base = $bd->query($sql); $nomb_padre = mysqli_fetch_assoc($base); $padre = $nomb_padre['NOMBRE']; } //REgreso el valor del padre return $padre; } //Trae el valor en horas de la vigencia del vinculo--------------------------------------------------------------------------- function verificarCorreoUsuario($bd, $user) { $sql = "SELECT U.CORREO FROM USUARIOS U WHERE U.USUARIO = '$user' LIMIT 1"; $base = $bd->query($sql); $result = mysqli_fetch_array($base); $correo = $result['CORREO']; return $correo; } //Trae LA URL DEL LOGO A UTLIZAR----------------------------------------------------------------------------------------------- function logoCorreos($bd) { $sql = " SELECT P.VALOR FROM PARAMETROS P WHERE P.CODIGO = 'LOGOHEADER_AUTO' LIMIT 1"; $base = $bd->query($sql); $result = mysqli_fetch_array($base); $logo = $result['VALOR']; return $logo; } //hago el update de las prefenrencia de usuario-------------------------------------------------------- function updatePreferenciasUsuario($bd, $user, $asunto, $confirmar, $clave) { $query = " UPDATE USUARIOS SET ENV_ASUNTO = '$asunto', ENV_GENJUST = $confirmar, ENV_PROTDOC = $clave WHERE USUARIO = '$user'"; mysqli_query($bd, $query); } //Funcion PARA OBTENER LA CLAVE DEL JUSTIFICANTE-------------------------------------------------------------------------------- function claveJustificante($bd, $nomb_just) { $sql = " SELECT DISTINCT EL.CLAVE FROM ESQUEMAS E INNER JOIN BIBLIOTECA_ETIQUETAS BE ON E.CODIGO = BE.ESQUEMA INNER JOIN BIBLIOTECA_ELEMENTOS EL ON BE.CLAVE = EL.CLAVE WHERE E.ACTIVO = 1 AND ( EL.EXTENSION = 'HTML' OR EL.EXTENSION = 'HTM' ) AND EL.UBICACION LIKE '##PUBLICO##/##PLAN_PUB##/%' AND EL.PAPELERA = 0 AND E.JUSTIFICANTE = 1 AND EL.NOMBRE LIKE '".$nomb_just.".%%'"; $base = $bd->query($sql); $row = mysqli_fetch_array($base); $result = $row["CLAVE"]; return $result; } //============================================================================================================================ //============================================================================================================================ ?>