Agrovial Consultores - La Palma

//* 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

LOS LLANOS DE ARIDANE
C/ Convento, 66
Bajo, Pta. A.
38760- Los Llanos de Aridane
Tel./ Fax.922 40 37 29

Carmelo Ramos E-mail
Móvil: 606 444 700

..........................

Siganos en...

..........................

Nº de visitas:

SUBVENCIONES

Administración AGROVIAL

BASES APROBADAS LA JUNTA DE GOBIERNO DEL CONSEJO INSULAR DE AGUAS DE LA PALMA
Ver ruta de enlace

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
Ver ruta de enlace

ANEXO I
Ver ruta de enlace

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.
Ver ruta de enlace

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