Designed by Vince El Roubio !
56 en ligne
  Forum | Actu | Glossaire | Codes | Tips | Liens | Livres | Annuaire
 

 Recherche





   

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 (26 313 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  
PHP - Drupagora : 1ère edition
Utiliser Reporting Services pour des NewsLetter - SQL Server Reporting Services et les NewsLetters
Le moteur de rapport inclus dans Microsoft SQL Server permet de créer de nombreux rapports ...
Changer la page d'erreur 401 SharePoint - La page d'erreur d'authentification SharePoint
Avec l'authentification classique des sites SharePoint, l'erreur d'authentification est gérée par ...
PHP - Graphique de l'angle du soleil en fonction du lieu
PHP5 - Graphique de l'angle du soleil en fonction du lieu
Adobe - Disponibilité d'Adobe Creative Suite 5.5
Les Thèmes dans SharePoint 2010 - Gérer les thèmes dans SharePoint 2010
SharePoint 2010 apporte de nombreuses modifications dont certaines dans le principe des thèmes.
JavaScript - fonction qui affiche l'heure à travers javascript
Installer SharePoint Foundation 2010 sur Windows 7 - Installer SP Foundation 2010 sur Windows Seven
Lorsque l'on souhaite développer dans le monde SharePoint, il existe plusieurs solutions. La ...
SharePoint et SQL Server 2008 R2 Report Server - Comment accéder à SharePoint depuis SSRS 2008 R2
Depuis la première version, la solution de rapport proposée par Microsoft "SQL Server Reporting ...
JS - Envoi d'un formulaire après chargement d'une image
Divers - Bannir une ip dans le global asax
Dreamweaver CS5 - Nouvelle version Dreamweaver CS5
Déjà plus de 6 mois que le produit est sorti, il fallait bien que je vous en parle un peu. Je vous ...
SharePoint Output Caching dans un site Intranet - Comment utiliser le cache dans un site Publishing
Afin de permettre l'amélioration des performances de sa ferme MOSS utilisée pour le site portail ...
Adobe - Adobe lance le Musée Adobe des Médias Numériques
Adobe - Adobe lance HTML5 Pack pour Illustrator CS5
PHP - Forum PHP 2010 : Le programme
Magazines - Le numéro 133 de programmez est disponible
Adobe - Adobe lance des applications Photoshop Express....
PHP - Détermination de l'intersection entre 2 segments
Magazines - Le N°132 de Programmez est disponible
Les alertes dans SharePoint 2007 - Comment SharePoint 2007 gère les User Alerts
Une des fonctionnalités de base de SharePoint, aussi bien dans Windows SharePoint Services (WSS) ...
Adobe - Photoshop.com Mobile pour Android 1.2
Adobe - Adobe dévoile une technologie de lecture.......
PHP - Experts PHP : participez au Forum PHP 2010 !
PHP - Fobec.com - Code source PHP & javascript
Foliotage alphabétique - Lister sur la première lettre d'un champ
Pour faire suite à l'article de JPierre sur la pagination alphabétique, voici, en ASP et en PHP, ...
Dreamweaver CS4 + Php + Mysql - Pagination alphabétique
Je vous propose la création d'une barre de navigation ou pagination alphabétique pour filtrer les ...
Adobe - HTML5 dans Dreamweaver CS5
VBScript - Déterminer si un chemin est absolu ou relatif
VBScript - Lire/écrire un fichier texte
Magazines - Le N°130 de Programmez est disponible
Hebergement - Hébergement à prix libre
Adobe - Adobe Creative Suite 5
PHP - Calcul de la date de Pâques
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
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 MVP Groupes Utilisateurs Microsoft TechNet ASP-magazine