Designed by Derf !
155 en ligne   Boutique | Sites | Bar | Forum | PhpBB | Actu | Glossaire | Codes | Tips | Liens | Livres | Lettre  


 Recherche

 NewsLetter






   

Lecture aléatoire de midi (1/2)

Lecture aléatoire de musique dans un dossier...





zut69
Le principe est assez simple : on stoque le nombre que l'on veut de fichiers musique en .mid dans un dossier et au chargement de la page, une de ces chansons est choisie au hasard !

Page 1  2  SUITE >> 

Version PHP - Version ASP


Alors voila, commençons par dire dans quel dossier se trouvent les musiques :

$repertoire='./votredossier/';

On va initialiser le compteur de fichiers midi et ensuite ouvrir le répertoire:

$compteur=0;
$handle=opendir($repertoire);

Lecture de tous les fichiers:

while ($fichier = readdir($handle)

Seuls les fichiers de plus de 3 caractères sont lus :

if (strlen($fichier)>3)

On récupère l'extension des fichiers:


$extension= strtolower(substrstrrchr( $fichier, "." ), 1 ));

Ne sont reconnus que les fichiers midi:

if ($extension=="mid")
{
 $compteur++;
$fichmidi[$compteur]=$fichier;

S'il y a plus d'un fichier, on en choisit un au hasard:

if ($compteur>0)
{
srand((double)microtime()*1000000);
$aleatoire=rand(1,$compteur);

Si on utilise internet explorer, le script adapté est lancé:

if (ereg("MSIE", $HTTP_USER_AGENT))
{
echo "<bgsound src='$repertoire$fichmidi[$aleatoire]' LOOP=INFINITE>";
}

Sinon, le script pour Netscape est lancé:

else
{
echo "<EMBED src='$repertoire$fichmidi[$aleatoire]' AUTOSTART=true
HIDDEN=true loop=true></EMBED>";
}

Maintenant que vous avez compris le code en entier, voilà un petit résumé du tout:



<?php
//seule chose à modifier: le nom du répertoire...
$repertoire='./votredossier/';

$compteur=0;
$handle=opendir($repertoire);

while ($fichier = readdir($handle))
{
   if (strlen($fichier)>3)
     {
       $extension= strtolower(substr( strrchr( $fichier, "." ), 1 ));

       if ($extension=="mid")
           {
              $compteur++;
              $fichmidi[$compteur]=$fichier;
           }
       }
   }
closedir($handle);

if ($compteur>0)
    {
    srand((double)microtime()*1000000);
    $aleatoire=rand(1,$compteur);

    if (ereg("MSIE", $HTTP_USER_AGENT))
        {
        echo "<bgsound src='$repertoire$fichmidi[$aleatoire]' LOOP=INFINITE>";
        }
        else
        {
        echo "<EMBED src='$repertoire$fichmidi[$aleatoire]' AUTOSTART=true
HIDDEN=true loop=true></EMBED>";
  }
    }
?>


C'est terminé !

Amusez-vous bien...
Page 1  2  SUITE >> 

Pour pouvoir écrire dans ce forum, identifiez-vous !

  v1.3p © ASP-PHP.net 2002  

zut69 le 13/03/2005 (22 651 hits)
Didier Téléchargez gratuitement et légalement des logiciels Microsoft ! Si, si ;)
  • Visual Studio 2010
  • Office 2010
  • Expression Studio 3
  • SQL Server 2008
  • et d'autres...
Au fil des news  
Magazines - Le N°128 de Programmez est disponible
Magazines - Le N°127 de Programmez est disponible
Dreamweaver CS4 + Php + Mysql - Trucs et Astuces - Part 6
Pour continuer dans le même style, je vous propose une suite au précédent article. Rechercher tous ...
Adobe - Adobe Photoshop.com Mobile pour iPhone 1.1
JavaScript - Ajouter une page dans vos favorites
Dreamweaver CS4 + Php + Mysql - Trucs et Astuces - Part 5 -
Je vous propose cette fois deux astuces. Comment exporter une feuille de style avec l'aide de ...
SharePoint Personalization Site Links - Les liens personnalisés des MySite SharePoint
Nous avons vu dans les articles précédents comment agrémenter les pages de recherche afin de ...
Magazines - Le n°126 de Programmez est disponible
Outils - Traducteur en ligne automatique pour site web
Adobe - Adobe Photoshop.com Mobile pour Iphone
Magazines - Le n°125 de Programmez est disponible
Adobe - Adobe AIR 2 et Flash Player 10.1version bêta
Les conférences autour des technologies Microsoft - Liste non exhaustive des grands évènements
Nous allons essayer de regrouper un grand nombre des évènements autour des technologies Microsoft ...
Magazines - Le n°124 de Programmez est disponible
PHP - Forum PHP 2009
Composants - eFace - XAML en Java
WPF - Désactiver le bouton de réduction d'une fenêtre
Magazines - Le n°123 de Programmez est disponible
Magazines - Le n°122 de Programmez est disponible
Auditer une ferme SharePoint - Assurer le bon fonctionnement de SharePoint
Dans le cadre de la bonne gestion de son environnement SharePoint, il est utile de faire un ...
SQL Server 2008 Report Builder 2.0 - Installation et utilisation de Report Builder 2.0
Dans le cadre de la création de rapports pour SQL Server Reporting Services 2008, un outil est ...
Magazines - Le HS N° 1 de Web Design est disponible
Adobe - Adobe propose en Open Source les frameworks.....
Outils - EntityBuilder
CSharp - Sérialisation XML de vos objets
Magazines - Le n°121 de Programmez est disponible
Adobe - Adobe annonce MAX 2009 !
Outils - WhoIs
[MAJ] Dreamweaver MX + Php + MySql - Les formulaires - partie 3
Mise à jour du code, par DB 77, affichage du code erreur, dans la page erreur.php, traduction des ...
PHP - News avec photo - Système de gestion - affichage
Gestion - Administration - Affichage d'une "News", "Actualité", "Info", ... avec : - mise en forme ...
Outils - Crypt
Dreamweaver Php Mysql - Région répétée imbriquée
Je rebondis, sur un post du forum, pour vous montrer comment obtenir grâce à l'extension Simulated ...
Magazines - Le n° 120 de Programmez est disponible
Gérer les bases de contenu SharePoint - Gérer la croissance du volume des données
Dans le cadre de la gestion quotidienne de ferme SharePoint, il existe une partie qu'il faut ...
PHP - Le Coach PHP sur Visual Studio
.NET - Ecrire une application .NET utilisant MySQL
PHP - Utilisation de PHP dans le monde Microsoft
Magazines - Le n° 119 de Programmez est disponible
Adobe - Adobe annonce Photoshop Marketplace
[MAJ] Tutoriel AJAX simple - En avant vers le WEB2.0
Mis à jour le 20/04/2009
Tutorial : HTML | Scripting | ASP-PHP | ASP.net | SQL Server | XML
Sharepoint | XAML | Pocket | Dreamweaver | VML | Divers
  Scripts : Scripting | ASP-PHP | ASP.net | Divers
  Boutique | Annuaire | Bannières | Météo | Tribune | Partenariats
v3b © Didier 2003   
 

Corpo Sciences de Reims Partitions gratuites Carte, météo, annonces
 DotNet Project ASP-magazine Groupes Utilisateurs Microsoft TechNet MVP