begin process at 2012 02 11 21:16:28
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > /FILEGEN

/FILEGEN


 Information sur la source

Note :
2,5 / 10 - par 2 personnes
2,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Niveau :Débutant Date de création :17/03/2004 Vu :1 648

Auteur : Seregon

Ecrire un message privé
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Bon petite aliase pour générer une liste html de fichiers mp3 dans un dossier selectionné. Iavais pas de rubrique snippest donc j'ai mis dans addons.
Vous inqiétez pas si mIRc freeze c'est juste que j'ai pas voulu faire un dialog pr indiquer la progression du listing (soit mdx soit 300k icones a intégrer ou encore un truc tout laid ou enfin 2ans de galerage en pict window)
L'ensemble de la liste est placée ds le fichier Mp3List.html

Source

  • alias fileGen {
  • set -u %d $sdir(D:\,Set directory)
  • if ($exists(Mp3list.html) == $true) { remove Mp3list.html }
  • write Mp3list.html <html><head><title>Mp3 List</title></head><body text="#2F5082" bgcolor="#000000"></body></html>
  • write Mp3list.html <p><font face="Arial" size="2">Mp3 list - $+(Directory:,',%d,') - $+(Files:,',$findfile(%d,*.mp3,0),') - $+(Sub dirs:,',$finddir(%d,*,0,500),') $+ </font></p>
  • set -u %nd 1
  • while (%nd <= $finddir(%d,*,0,0)) {
  • echo -ag - $lasttok($finddir(%d,*,%nd,0),92) done
  • write Mp3list.html <p><font face="Arial" style="font-size: 10pt">&gt; $lasttok($finddir(%d,*,%nd,0),92) $+ </font><br><br>
  • set -u %nf 1
  • while (%nf <= $findfile($finddir(%d,*,%nd,0),*.mp3,0,50)) {
  • write Mp3list.html <font face="Verdana" style="font-size: 9pt" font color="#C0C0C0"> $+ $str(&nbsp;,4) $remove($findfile($finddir(%d,*,%nd,0),*.mp3,%nf,50), $finddir(%d,*,%nd,0)) $+ </font><br>
  • inc %nf 1
  • }
  • write Mp3list.html </p>
  • inc %nd 1
  • }
  • set -u %d
  • }
alias fileGen {
  set -u %d $sdir(D:\,Set directory)
  if ($exists(Mp3list.html) == $true) { remove Mp3list.html }
  write Mp3list.html <html><head><title>Mp3 List</title></head><body text="#2F5082" bgcolor="#000000"></body></html>
  write Mp3list.html <p><font face="Arial" size="2">Mp3 list - $+(Directory:,',%d,') - $+(Files:,',$findfile(%d,*.mp3,0),') - $+(Sub dirs:,',$finddir(%d,*,0,500),') $+ </font></p>
  set -u %nd 1
  while (%nd <= $finddir(%d,*,0,0)) {
    echo -ag - $lasttok($finddir(%d,*,%nd,0),92) done
    write Mp3list.html <p><font face="Arial" style="font-size: 10pt">&gt; $lasttok($finddir(%d,*,%nd,0),92) $+ </font><br><br>
    set -u %nf 1
    while (%nf <= $findfile($finddir(%d,*,%nd,0),*.mp3,0,50)) {
      write Mp3list.html <font face="Verdana" style="font-size: 9pt" font color="#C0C0C0"> $+ $str(&nbsp;,4)  $remove($findfile($finddir(%d,*,%nd,0),*.mp3,%nf,50), $finddir(%d,*,%nd,0)) $+ </font><br>
      inc %nf 1
    }
    write Mp3list.html </p>
    inc %nd 1
  }
  set -u %d
}



 Sources du même auteur

SNIPPET: /DRAWMIX
Source avec Zip METEOCONSULT
Source avec Zip BATNAV: JEU DE BATAILLE NAVALE POUR MIRC
SNIPPET - /DRAWTRANSP
SNIPPET: INTERCONNECTION SYSTEM

 Sources de la même categorie

PACMAN MULTI-JOUEUR EN LIGNE par wims
PROXY&SOCKS SCANNER+LEECHER par independentt
GESTIONNAIRE DE HIGHLIGHT AVANCÉ AVEC IGNORE SALON OU PSEUDO par doob666
AUTOJOIN HTABLE MULTISERVER par doob666
TCL - AJOUT SUPPRESSION DE LOGS par Atok

Commentaires et avis

Commentaire de ChAnG-Fu le 17/03/2004 23:06:41

A venir:
-&gt; Inclue une config des couleurs
-&gt; Set la list en fonction de la date
-&gt; Utilise le File Handling

Optimisation:
-&gt; les set -u peuvent etre changer en var
-&gt; if ($exists(Mp3list.html) == $true) =&gt; if ($exists(Mp3list.html))

Commentaire de SornDrixer le 18/03/2004 07:33:03 administrateur CS

Waouw faut vraiment optimiser tout ça !
Sinon c'est un bon snippet.

Commentaire de tofu le 18/03/2004 07:41:52

tes $findfile et $finddir mets les ds des var au début, ça accélérera le temps d'exécution déjà :)

Commentaire de Kerrigan le 20/03/2004 00:28:17

une fois j'ai utilisé une hashtable pour stocker des données de ce type une fois pour toute. Ce me permet de scanner 4000 fichiers en quelque milisecondes ... c dans la rubrique astuce jette un coup d'oeil ça pourrait t'aider ...

Commentaire de Seregon le 20/03/2004 05:54:30

je connais les hash ms bon ce code jlavais vrmt fé a l'arrache histoire de mfaire une liste une bonne foi pr tte.Jle reprendra quand mon script sera achevé.

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,636 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales