Francisco Sobrino

Inicio

Blanco y negro        Color        Transparencia        Metal        Movimiento

sort; // on filtre les images var:'listeImages'=(array); loop:($listeFichiers->size); var:'nomFichier'=$listeFichiers->(get:(loopCount)); if:$nomFichier->(endsWith:'.jpg'); $listeImages->(insertLast:$nomFichier); /if; /loop; ?> [loop:$listeImages->size] (get:(loopCount)); var:'url_image'=$urlImg_base+$ssrub+'/pt/'+$nomImage; var:'urlPage'='sonoeuvre.las?ssrub='+$ssrub+'&vnum='+(loopCount)+'&inum=1'; ?> [/loop]
(get:$vnum); // on récupère la racine du nom avec les 4 premiers caractères var:'racine'=(String_Extract: $nomVigCur, -StartPosition=1, -EndPosition=4); // on va maintenant prendre la liste de tous les fichiers d'image var:'imgpath'=$pathImg_base+$ssrub+'/'; var_set:'listeFichiers'=(File_ListDirectory:$imgpath); $listeFichiers->sort; // on filtre les images var:'listeImages'=(array); loop:($listeFichiers->size); var:'nomFichier'=$listeFichiers->(get:(loopCount)); if:$nomFichier->(beginsWith:$racine) && ($nomFichier->(endsWith:'.jpg') || $nomFichier->(endsWith:'.webm')); $listeImages->(insertLast:$nomFichier); /if; /loop; var:'nbImages'=$listeImages->size; ?> [loop:$nbImages] [if:(loopCount)==$inum][else][/if] [/loop]

$nbImages; var:'inum_suiv'=1; /if; var:'nomImgCur'=$listeImages->(get:$inum); // on sépare la racine de l'extension var:'array'=$nomImgCur->(split:'.'); var:'racine'=$array->get:1; var:'pathCur'=$urlImg_base+$ssrub+'/'; var:'urlImgCur'=$pathcur+$nomImgCur; var:'urlPageSuiv'='sonoeuvre.las?ssrub='+$ssrub+'&vnum='+$vnum+'&inum='+$inum_suiv; ?> [if:(var:'urlImgCur')->(EndsWith:'.jpg')] [/if] [if:(var:'urlImgCur')->(EndsWith:'.webm')] [/if]