//* Autor PHP: Daniel Martín Gómez *> //* Titulo: inc_config.php *> //* Diseño Web: Gladys Riego *> //* Modificación PHP: Gladys Riego *> //************************************************************************> //************************************************************************* // Base de datos // // //************************************************************************* //******************* // Servidor público //******************* $Servidor = "lldb542.servidoresdns.net"; $BaseDeDatos = "qaz310"; $Usuario = "qaz310"; $Contrasenia = "agrovial"; //************************************************************************* // Variables // // //************************************************************************* setlocale(LC_CTYPE, 'es_ES'); $NombreWeb="agrovial.es"; $DiasAnuncioActivo=60; $NumeroNoticiasAdmin=25; $NumeroPremiosFeria=20; $NumeroPremiosCata=15; $PesoMaximoDocumentos=3072000; $PesoMaximoFotos=512000; $AnchoMaximoFotos=500; $AltoMaximoFotos=500; //************************************************************************* // Directorios // // //************************************************************************* $RutaServidorHTTP = "http://www.agrovial.es/"; $RutaServidorFTP = "www.agrovial/html/"; $RutaDeAdmin = "admin/"; $RutaDeDocumentos = "docs/"; $RutaDeFotos = "fotos/"; $RutaDeLogo = "admin/images/logo.jpg"; $RutaDeCSS = "admin/images/css_isla.css"; //************************************************************************* // Tablas // // //************************************************************************* $TablaDocumentos = "documentos"; $TablaNoticias = "noticias"; //************************************************************************* // Direccion E-Mail Notificaciones // // //************************************************************************* $DireccionEMail = "tomas.rodriguez@agrovial.es,gladys@aderlapalma.org"; //************************************************************************* // Funciones // // //************************************************************************* function Thumbnail($RutaDeFotos_f, $NombreDeFoto_f, $AnchoMaximoFotos_f, $AltoMaximoFotos_f){ //$RutaDefinitiva = $RutaDeFotos_f.$NombreDeFoto_f; //Caso 1: La fotografía ha sido enviada vía POST (formulario de inserción) if (move_uploaded_file($_FILES["fotografia"]["tmp_name"], $RutaDeFotos_f.$NombreDeFoto_f)) { //Abrir la imagen para crear thumbnail $img = @imagecreatefromjpeg($RutaDeFotos_f.$NombreDeFoto_f); if ($img){ //Obtener el tamaño de la imagen y reescalarla $width = imagesx($img); $height = imagesy($img); $scale = min($AnchoMaximoFotos_f/$width, $AltoMaximoFotos_f/$height); //Si la imagen es de mayor tamaño que la original, sustituirla if ($scale < 1) { $new_width = floor($scale*$width); $new_height = floor($scale*$height); # Crear una nueva imagen temporal $tmp_img = imagecreatetruecolor($new_width, $new_height); # Copiar y reescalar la imagen nueva sobre la antigua imagecopyresized($tmp_img, $img, 0, 0, 0, 0, $new_width, $new_height, $width, $height); imagedestroy($img); $img = $tmp_img; #Reescribir el archivo con nuevo tamaño imagejpeg($img,$RutaDeFotos_f.$NombreDeFoto_f); } if($img){$error=0;} else {$error=1;} return($error); } } //Caso 2: Hay que coger la foto directamente del disco duro (formulario de edición) else { //Abrir la imagen para crear thumbnail $img = imagecreatefromjpeg($RutaDeFotos_f.$NombreDeFoto_f); if ($img){ //Obtener el tamaño de la imagen y reescalarla $width = imagesx($img); $height = imagesy($img); $scale = min($AnchoMaximoFotos_f/$width, $AltoMaximoFotos_f/$height); //Si la imagen es de mayor tamaño que la original, sustituirla if ($scale < 1) { $new_width = floor($scale*$width); $new_height = floor($scale*$height); # Crear una nueva imagen temporal $tmp_img = imagecreate($new_width, $new_height); # Copiar y reescalar la imagen nueva sobre la antigua imagecopyresized($tmp_img, $img, 0, 0, 0, 0, $new_width, $new_height, $width, $height); imagedestroy($img); $img = $tmp_img; #Reescribir el archivo con nuevo tamaño imagejpeg($img,$RutaDeFotos_f.$NombreDeFoto_f); } if($img){$error=0;} else {$error=1;} return($error); } } } function randomizer () { $salt = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890"; srand((double)microtime()*1000000); $i = 0; while ($i < 20) { $num = rand() % 33; $tmp = substr($salt, $num, 1); $pass = $pass . $tmp; $i++; } return $pass; } ?> Agrovial Consultores - La Palma

 


SUBVENCIONES

Administración AGROVIAL


BASES APROBADAS LA JUNTA DE GOBIERNO DEL CONSEJO INSULAR DE AGUAS DE LA PALMA
BASES APROBADAS POR ACUERDO DE LA JUNTA DE GOBIERNO DEL CONSEJO INSULAR DE AGUAS DE LA PALMA, REUNIDA EN SESIÓN ORDINARIA DEL DÍA 30 DE OCTUBRE DE 2008, POR LAS QUE SE HA DE REGIR LA CONVOCATORIA DEL CONCURSO PÚBLICO PARA LA SOLICITUD DE AUXILIOS ECONÓMICOS A PROYECTOS DE OBRAS HIDRÁULICAS DE INICIATIVA PRIVADA PARA 2009,

BAREMOS AUXILIOS 2009

ANEXO I
Modelo de Instancia y Documento a presentar.

Auxilios económicos a obras hidráulicas de iniciativa privada por el Consejo Insular de Aguas de La Palma para el año 2009.
Acuerdo de la Junta de Gobierno del Consejo Insular de Aguas de La Palma, por el que se convoca concurso público para la solicitud de auxilios económicos para proyectos de obras hidráulicas de iniciativa privada para 2009. La Junta de Gobierno del Consejo Insular de Aguas de La Palma, en la sesión ordinaria celebrada el día 30 de octubre de 2008, acordó aprobar las bases que han de regir el concurso público para la solicitud de auxilios económicos para proyectos de obras hidráulicas de iniciativa privada para 2009. Página: 24847