Codigos php utiles y gratis

Como obtengo la fecha del servidor

codigosphp 24/02/2008 @ 18:11

$sdate=date("d")."/".date("m")."/".date("Y");
$stime=date("h").":".date("i");
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Reconocer características del visitante

codigosphp 24/02/2008 @ 18:11

if ($HTTP_ACCEPT_LANGUAGE != ''){ # Verificamos que el visitante haya designado algún idioma
    $idiomes = explode(",", $HTTP_ACCEPT_LANGUAGE); # Convertimos HTTP_ACCEPT_LANGUAGE en array
    /* Recorremos el array hasta que encontramos un idioma del visitante que coincida con los idiomas
    en que está disponible nuestra web */
    for ($i=0; $i<count($idiomes); $i++){
        if (!isset($idioma)){
            if (substr($idiomes[$i], 0, 2) == "ca"){$idioma = "ca";}
            if (substr($idiomes[$i], 0, 2) == "es"){$idioma = "es";}
            if (substr($idiomes[$i], 0, 2) == "en"){$idioma = "en";}
            if (substr($idiomes[$i], 0, 2) == "fr"){$idioma = "fr";}
        }
    }
}

# Si no hemos encontrado ningún idioma que nos convenga, mostramos la web en el idioma por defecto
if (!isset($idioma)){$idioma = "ca";}

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Como genero un reporte en EXCEL a partir de una tabla

codigosphp 24/02/2008 @ 18:10

$shtml="

Id Codigo US$

1 C4325 2000.00

2 DX456 1000.00

3 -50.00

4 A18-TG 20.64

";
$scarpeta=""; //carpeta donde guardar el archivo.
//debe tener permisos 775 por lo menos
$sfile=$scarpeta."/xxxx.xls"; //ruta del archivo a generar
$fp=fopen($sfile,"w");
fwrite($fp,$shtml);
fclose($fp);
echo ".$sfile."'>Haz click aqui";
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Como envio un email en formato HTML

codigosphp 24/02/2008 @ 18:10

$sfrom=""; //cuenta que envia
$sdestinatario=""; //cuenta destino
$ssubject=""; //subject
$shtml=""; //mensaje
$sheader="From:".$sfrom."\nReply-To:".$sfrom."\n";
$sheader=$sheader."X-Mailer:PHP/".phpversion()."\n";
$sheader=$sheader."Mime-Version: 1.0\n";
$sheader=$sheader."Content-Type: text/html";
mail($sdestinatario,$ssubject,$shtml,$sheader);
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Cómo distribuir los resultados de un query en columnas

codigosphp 24/02/2008 @ 17:59

echo "

";

$columnes = 4; # Número de columnas (variable)

if (($rows=mysql_num_rows($result))==0) {
echo "

$row[1]

";
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Convertir numeros a letras

codigosphp 08/02/2008 @ 17:49

Convertir numeros a letras
Consta de varias funciones que son llamadas desde las otras, la función principal es convertir_a_letras($numero). Admite un rango desde 0,00 hasta
9.999.999.999,99.

// FUNCIONES DE CONVERSION DE NUMEROS A LETRAS.

function centimos()
{
global $importe_parcial;

$importe_parcial = number_format($importe_parcial, 2, ".", "") * 100;

if ($importe_parcial > 0)
$num_letra = " con ".decena_centimos($importe_parcial);
else
$num_letra = "";

return $num_letra;
}

return $num_letra;
}

function cien()
{
global $importe_parcial;

$parcial = 0; $car = 0;

while (substr($importe_parcial, 0, 1) == 0)
  $importe_parcial = substr($importe_parcial, 1, strlen($importe_parcial) - 1);

if ($importe_parcial >= 1 && $importe_parcial <= 9.99)
  $car = 1;
else if ($importe_parcial >= 10 && $importe_parcial <= 99.99)
  $car = 2;
else if ($importe_parcial >= 100 && $importe_parcial <= 999.99)
  $car = 3;

$parcial = substr($importe_parcial, 0, $car);
$importe_parcial = substr($importe_parcial, $car);

$num_letra = centena($parcial).centimos();

return $num_letra;
}

function cien_mil()
{
global $importe_parcial;

$parcial = 0; $car = 0;

while (substr($importe_parcial, 0, 1) == 0)
  $importe_parcial = substr($importe_parcial, 1, strlen($importe_parcial) - 1);

if ($importe_parcial >= 1000 && $importe_parcial <= 9999.99)
  $car = 1;
else if ($importe_parcial >= 10000 && $importe_parcial <= 99999.99)
  $car = 2;
else if ($importe_parcial >= 100000 && $importe_parcial <= 999999.99)
  $car = 3;

$parcial = substr($importe_parcial, 0, $car);
$importe_parcial = substr($importe_parcial, $car);

if ($parcial > 0)
{
  if ($parcial == 1)
   $num_letra = "mil ";
  else
   $num_letra = centena($parcial)." mil ";
}

return $num_letra;
}

function millon()
{
global $importe_parcial;

$parcial = 0; $car = 0;

while (substr($importe_parcial, 0, 1) == 0)
  $importe_parcial = substr($importe_parcial, 1, strlen($importe_parcial) - 1);

if ($importe_parcial >= 1000000 && $importe_parcial <= 9999999.99)
  $car = 1;
else if ($importe_parcial >= 10000000 && $importe_parcial <= 99999999.99)
  $car = 2;
else if ($importe_parcial >= 100000000 && $importe_parcial <= 999999999.99)
  $car = 3;

$parcial = substr($importe_parcial, 0, $car);
$importe_parcial = substr($importe_parcial, $car);

if ($parcial == 1)
  $num_letras = "un millón ";
else
  $num_letras = centena($parcial)." millones ";

return $num_letras;
}

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Calculo de edad

codigosphp 08/02/2008 @ 17:48

Calculo de edad
Función que calcula la edad de una persona tomando su fecha de nacimiento.

function edad($fecha_nac)
{
//Esta funcion toma una fecha de nacimiento
//desde una base de datos mysql
//en formato aaaa/mm/dd y calcula la edad en números enteros

$dia=date("j");
$mes=date("n");
$anno=date("Y");

//descomponer fecha de nacimiento
$dia_nac=substr($fecha_nac, 8, 2);
$mes_nac=substr($fecha_nac, 5, 2);
$anno_nac=substr($fecha_nac, 0, 4);

if($mes_nac>$mes){
  $calc_edad= $anno-$anno_nac-1;
}else{
  if($mes==$mes_nac AND $dia_nac>$dia){
   $calc_edad= $anno-$anno_nac-1;
  }else{
   $calc_edad= $anno-$anno_nac;
  }
}
return $calc_edad;
}
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Redimensionar imagen

codigosphp 08/02/2008 @ 17:46

Redimensionar imagen
Este código redimensiona una imagen JPG a un tamaño especificado.
Necesita la libreria GD.

$origen="img/imagen.jpg";
$destino="img/nuevaimagen.jpg";
$destino_temporal=tempnam("tmp/","tmp");
redimensionar_jpeg($origen, $destino_temporal, 300, 350, 100);

// guardamos la imagen
$fp=fopen($destino,"w");
fputs($fp,fread(fopen($destino_temporal,"r"),filesize($destino_temporal)));
fclose($fp);

// mostramos la imagen
echo "";

function redimensionar_jpeg($img_original, $img_nueva, $img_nueva_anchura, $img_nueva_altura, $img_nueva_calidad)
{
// crear una imagen desde el original
$img = ImageCreateFromJPEG($img_original);
// crear una imagen nueva
$thumb = imagecreatetruecolor($img_nueva_anchura,$img_nueva_altura);
// redimensiona la imagen original copiandola en la imagen
ImageCopyResized($thumb,$img,0,0,0,0,$img_nueva_anchura,$img_nueva_altura,ImageSX($img),ImageSY($img));
// guardar la nueva imagen redimensionada donde indicia $img_nueva
ImageJPEG($thumb,$img_nueva,$img_nueva_calidad);
ImageDestroy($img);
}
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Codificación del mail

codigosphp 08/02/2008 @ 17:44

Codificación del mail

Código que codifica el correo en modo ascii y/o hexadecimal para que algunos programas de captura de emails no los puedan encontrar.

echo "\n".encodeMailAscii("nombre_cuenta-correo@dominio.com")."nombre_cuenta-correo@dominio.com")."'>".encodeMailAscii("nombre_cuenta-correo@dominio.com")." />";
echo "\n".encodeMailHexadecimal("nombre_cuenta-correo@dominio.com")."nombre_cuenta-correo@dominio.com")."'>".encodeMailHexadecimal("nombre_cuenta-correo@dominio.com")." />";

/*
* Devuelve una cadena en su valor ascii
* para ser interpretada por los navegadores
*/
function encodeMailAscii($mail)
{
for($i=0;$i {
$result.="&#".ord($mail[$i]);
}
return $result;
}

/*
* Devuelve una cadena en su valor hexadecimal
* para ser interpretada por los navegadores
*/
function encodeMailHexadecimal($mail)
{
for($i=0;$i {
$result.="&#x".bin2hex($mail[$i]);
}
return $result;
}
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Subir archivos a un servidor

codigosphp 08/02/2008 @ 17:39

Crear un fichero llamado bajar.php con el siguiente codigo. no se necesita ftp para subir ficheros. es probable que necesiten darle 666 o 777 a la carpeta a usar

if($archivo !=""){
@copy($archivo, $archivo_name);
echo "El archivo se ha guardado correctamente.";
}
else{
echo "Selecciona el archivo a guardar en el servidor...";
}
?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Rotador de texto con php

codigosphp 06/02/2008 @ 05:19

Hay que hacer los ficheros.txt con la palabra que iremos a rotar o el contenido.

include ("texto1.txt");
include ("texto2.txt");
include ("texto3.txt");
include ("texto4.txt");

$textscript1 = $texto1
$textscript2 = $texto2
$textscript3 = $texto3
$textscript4 = $texto4

var textos = new Array()
textos[0] = ''+$textscript1; ?>+''
textos[1] = ''+echo $textscript2; ?>+''
textos[2] = ''+echo $textscript3; ?>+''
textos[3] = ''+echo $textscript4; ?>+''
var indice = 0

?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Contador de visitas con un archivo .txt

codigosphp 05/02/2008 @ 07:40

Primero que nada debemos crear un archivo que se encuentre con el numero "0", eso claro si queremos iniciar desde ese numero de visitas, dicho archivo se llamara "visitas.txt":

$counterFile = "visitas.txt";

function displayCounter($counterFile) {
$fp = fopen($counterFile,rw);
$num = fgets($fp,5);
$num += 1;
echo "$num";
exec( "rm -rf $counterFile");
exec( "echo $num > $counterFile");
}

if (!file_exists($counterFile)) {
exec( "echo 1 > $counterFile");
}

displayCounter($counterFile);

?>

Ver/Escribir Comentarios Meneame

Meneame |

del.icio.us

Codigos php utiles y gratis

Archivo: Febrero 2008

Como obtengo la fecha del servidor

Reconocer características del visitante

Como genero un reporte en EXCEL a partir de una tabla

Como envio un email en formato HTML

Cómo distribuir los resultados de un query en columnas

Convertir numeros a letras

Calculo de edad

Redimensionar imagen

Codificación del mail

Subir archivos a un servidor

Rotador de texto con php

Contador de visitas con un archivo .txt

Categorías

Tags

Sindicar