Función EmiteFondos()
<?php
function EmiteFondos()
{
// Montamos una relación con los nombres de los fondos
// que hay en el directorio
$Relacion = Tedecea_Listado ('*.jpg');
foreach ( $Relacion as $NombreArchivo )
{
// Dimensiones de la imagen
$TamanoImagen = GetImageSize ("$NombreArchivo.jpeg");
// Las dimensiones las lee PHP
$DimensionesImagen = $TamanoImagen[3];
$CodigoHTML=<<<HTML
<A HREF="$NombreArchivo.jpg">
<IMG SRC="$NombreArchivo.jpeg" $DimensionesImagen CLASS="seguido"
ALT="$NombreArchivo" TITLE="$i: $NombreArchivo">
</A>
HTML;
print $CodigoHTML;
}
}
php?>