Netophonix - Le forum Index du Forum Netophonix - Le forum Index du Forum
 FAQFAQ   RechercherRechercher   Liste des MembresListe des Membres   Groupes d'utilisateursGroupes d'utilisateurs   S'enregistrerS'enregistrer 
 ProfilProfil   Se connecter pour vérifier ses messages privésSe connecter pour vérifier ses messages privés   ConnexionConnexion 
Règles et fonctionnementRègles et fonctionnement   Liste des sagas mp3Liste des sagas mp3

Generateur de liste de lecture

 
Poster un nouveau sujet   Répondre au sujet    Netophonix - Le forum Index du Forum -> Informatique -> Informatique : Questions/Réponses
Voir le sujet précédent :: Voir le sujet suivant  
Auteur Message
ShadesOfGray

Postulant
 Postulant


H/F: H/F:Homme
Inscrit le: 27 Juin 2008
Age: 27
Messages: 8
Localisation: oui


MessagePosté le: Ven 04 Juil 2008, 07:09    Sujet du message: Generateur de liste de lecture Répondre en citant

Vous en avez marre d'avoir a charger chacun des episodes un a un de vos sagas preferees dans votre logiciel de musique?

Vous aimez les defis, les risques, et les bidouillages?

Faites vos propres listes de lecture avec ce petit script:

Code:
On Error Resume Next

Dim fso, folder, files, NewsFile, sFolder
Dim filearray()

 sFolder = Wscript.Arguments.Item(0)
 If sFolder = "" Then
 Wscript.Echo "vous devez glisser un dossier sur le fichier de script"
 Wscript.Quit
 End If

Set fso = CreateObject("Scripting.FileSystemObject")
Set NewFile = fso.CreateTextFile(sFolder + ".m3u", True)
Set folder = fso.GetFolder(sFolder)
Set files = folder.Files
i=-1

For each folderIdx In files
   i = i +1
      ReDim Preserve filearray(i)
   filearray(i)=   folderIdx.Name
Next

For i = (UBound(filearray) - 1) to 0 Step -1
    For j= 0 to i
        If UCase(filearray(j)) > UCase(filearray(j+1)) Then
            strHolder = filearray(j+1)
            filearray(j+1) = filearray(j)
            filearray(j) = strHolder
        End If
    Next
Next


For Each arrayElement In filearray
   NewFile.WriteLine(sFolder + "\" + arrayElement)
next

NewFile.Close


Vous n'avez qu'a placer vos series dans des dossiers separes, ensuite, vous copiez/collez ce script dans un fichier que vous nommez (quelquechose).vbs (si vous le faites avec le bloc note, il faut mettre des guillemets au debut et a la fin du fichier pour avoir l'extension vbs, sinon il le nomme quelquechose).vbs.txt, et ca, il faut pas)

ensuite, vous glissez le dossier de votre saga, et hop! vous vous retrouvez avec un fichier nomme (votresaga).m3u


facon conseillee de placer vos fichiers avec ce script:

-dossier "sagas"
---truc.vbs
---dossier "lasagadeshades"
-----episode1.mp3
-----episode2.mp3
---dossier "lasagadequelqu'und'autre"
-----episode1.mp3
-----episode2.mp3
-----episodex.mp3


petit p.s.: je n'avais aucune idee de l'endroit ideal pour ecrire ceci, donc si un moderateur croit qu'un autre endroit serait plus approprie...
_________________
Des fois,
j'ai peur un peu des fois,
j'ai peur beaucoup des fois,
mais des fois je nai pas peur du tout!
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Adresse AIM Yahoo Messenger MSN Messenger
Shay

Recrue
Recrue


H/F: non renseigné
Inscrit le: 06 Aoû 2007
Age: 23
Messages: 64
Localisation: Le Mans / Vendée


MessagePosté le: Ven 04 Juil 2008, 07:45    Sujet du message: Répondre en citant

Oo

Euhh...

Ou sinon on utilise un logiciel intelligent genre winamp qui gère super bien les dossiers, les albums et les listes ...

Je ne sais pas pour les autres lecteurs, mais sous winamp, tu sélectionne tes fichiers (un simple trait de sélection), clic droit > nouvelle liste, et dans les listes, exporter et hop, ça passe en m3u.
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Visiter le site web de l'utilisateur
Kak Miortvi Pengvin

Modérateur
 Modérateur


H/F: H/F:Homme
Inscrit le: 21 Jan 2007
Age: 21
Messages: 1561
Localisation: Entre mes deux oreilles.


MessagePosté le: Ven 04 Juil 2008, 08:10    Sujet du message: Répondre en citant

Pareil que pour Shay, iTunes est capable de maintenir une bibliothèque de fichiers ordonnées sans que l'utilisateur ne fasse quoi que ce soit. Ensuite, il y les listes de lectures et les listes de lectures intelligentes...

Sinon, je n'ai pas compris le réel intérêt de ce morceau de code. Car si on doit ajouter un épisode, il faut refaire la liste non?

Sinon, je verrai bien ça dans les questions réponses de la section info du forum...
_________________
Toute l'actualité des sagas mp3 est sur www.macp3.info.
La Team Weuaaargh! Une équipe de malades du mp3.©
L'art du Pingouin, gribouillis en tous genres...
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Visiter le site web de l'utilisateur
Blast

Administrateur
 Administrateur


H/F: H/F:Homme
Inscrit le: 02 Jan 2007
Age: 42
Messages: 4360
Localisation: Bruxelles

A travaillé sur :
Monos dans le Calendrier de l'Avent, Saga Le Netophonix et autres défis ; Mixeur de la Taverne de Kadelfek ; Voix dans Skull 13, La D.G.S.C.E., Mission: Impossible, l'édition soviétique, Saga Le Netophonix, Team Weuaaargh, Far Western, Velvorn : The Bladed Druid, Tasheman, Kiponie Stories, Supremum - Les Chroniques de Nede, Tarentur Platinum, Hard Life, Xenozis

MessagePosté le: Ven 04 Juil 2008, 08:49    Sujet du message: Répondre en citant

En guise de question, Kak Miortvi Pengvin a écrit:
Sinon, je n'ai pas compris le réel intérêt de ce morceau de code.


En guise de réponse, ShadesOfGray a écrit:
Vous aimez les defis, les risques, et les bidouillages?




Kak Miortvi Pengvin a écrit:
Sinon, je verrai bien ça dans les questions réponses de la section info du forum...

Je vais l'y transferer de ce pas.
_________________
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé
ShadesOfGray

Postulant
 Postulant


H/F: H/F:Homme
Inscrit le: 27 Juin 2008
Age: 27
Messages: 8
Localisation: oui


MessagePosté le: Ven 04 Juil 2008, 22:43    Sujet du message: Répondre en citant

Shay: je sais, mais mon pc est de plus en plus vieillot par rapport avec winamp (et de toute facon, je prefere media player classic)

Kak Miortvi Pengvin: L'interet, c'est que si on modifie le dossier, on a qu'a le re-glisser sur le fichier de script, et il refait lui-meme la liste, comme un grand. J'avais oublie de dire qu'il la placait en ordre alphabetique... c'est mieux comme ca, non?


A bas l'empire bipolistique (c'est comme monopolistique mais a deux) de winamp et iTunes!
_________________
Des fois,
j'ai peur un peu des fois,
j'ai peur beaucoup des fois,
mais des fois je nai pas peur du tout!
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Adresse AIM Yahoo Messenger MSN Messenger
Sculderoy

Créateur
 Créateur


H/F: H/F:Homme
Inscrit le: 15 Jan 2007
Age: 19
Messages: 1643
Localisation: Bordeaux

A travaillé sur :
Skull 13

MessagePosté le: Ven 04 Juil 2008, 23:31    Sujet du message: Répondre en citant

Tu l'as codé toi même ce script VB.NET ? . Faudrait que je m'y remette
parce que là je comprends rien...
_________________
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Envoyer un e-mail Visiter le site web de l'utilisateur MSN Messenger
Kak Miortvi Pengvin

Modérateur
 Modérateur


H/F: H/F:Homme
Inscrit le: 21 Jan 2007
Age: 21
Messages: 1561
Localisation: Entre mes deux oreilles.


MessagePosté le: Sam 05 Juil 2008, 07:48    Sujet du message: Répondre en citant

ShadesOfGray a écrit:
Kak Miortvi Pengvin: L'interet, c'est que si on modifie le dossier, on a qu'a le re-glisser sur le fichier de script, et il refait lui-meme la liste, comme un grand. J'avais oublie de dire qu'il la placait en ordre alphabetique... c'est mieux comme ca, non?

C'est un poil mieux mais bon... Et côté gestion des fichiers, ça se passe comment? Il faut que les noms soient formatés d'une certaine façon pour les avoir dans l'ordre de parution? (question peut être idiote mais il y a des fois où les noms des .mp3 sont obscurs et les tags pas très clairs...)

ShadesOfGray a écrit:
A bas l'empire bipolistique (c'est comme monopolistique mais a deux) de winamp et iTunes!

Je dirai rien parce que tu préfères le Windows Media Player hein... (je peux t'expliquer pourquoi je préfère iTunes mais ça sera par mp parce que ça serait du hs total ici)
_________________
Toute l'actualité des sagas mp3 est sur www.macp3.info.
La Team Weuaaargh! Une équipe de malades du mp3.©
L'art du Pingouin, gribouillis en tous genres...
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Visiter le site web de l'utilisateur
ShadesOfGray

Postulant
 Postulant


H/F: H/F:Homme
Inscrit le: 27 Juin 2008
Age: 27
Messages: 8
Localisation: oui


MessagePosté le: Sam 05 Juil 2008, 10:47    Sujet du message: Répondre en citant

Sculderoy: c'est un script a 90% a moi (en gros, ce que j'ai pas fait moi-meme j'ai eu a le modifier a partir de trucs du domaine public)
ps: c'est pas du .net, c'est du vbs (on a sa fierte quand meme )

Kak Miortvi Pengvin: pour l'ordre, c'est l'ordre alphabetique pur et dur (selon la table ascii, donc les chiffres sont avant les lettres) mais je suis en train d'essayer de trouver une methode pour extraire le numero de l'episode du nom du fichier (et de les placer a partir de ca)

Kak Miortvi Pengvin a écrit:
Windows Media Player
ShadesOfGray a écrit:
Media Player Classic

_________________
Des fois,
j'ai peur un peu des fois,
j'ai peur beaucoup des fois,
mais des fois je nai pas peur du tout!
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Adresse AIM Yahoo Messenger MSN Messenger
Kak Miortvi Pengvin

Modérateur
 Modérateur


H/F: H/F:Homme
Inscrit le: 21 Jan 2007
Age: 21
Messages: 1561
Localisation: Entre mes deux oreilles.


MessagePosté le: Sam 05 Juil 2008, 10:59    Sujet du message: Répondre en citant

Toutes mes excuses...
_________________
Toute l'actualité des sagas mp3 est sur www.macp3.info.
La Team Weuaaargh! Une équipe de malades du mp3.©
L'art du Pingouin, gribouillis en tous genres...
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Visiter le site web de l'utilisateur
benji78

Postulant
 Postulant


H/F: H/F:Homme
Inscrit le: 27 Aoû 2007
Age: 18
Messages: 36
Localisation: Saint Quentin en Yvelines- Montingy le bretonneux


MessagePosté le: Dim 06 Juil 2008, 22:41    Sujet du message: Répondre en citant

Salut, je ne comprend pas trop de se qu'on fera du code tel quel, pourquoi ne créerais-tu pas une application, avec ton code directement intégré à celle-ci ?

Sinon pour extraire des informations d'un fichier procède comme ceci :


Private Const DOSSIER_SAGA As String = "C:\" & _
"Documents and Settings\Benjamin\Mes documents\Saga MP3"

Private ListeFormats() As String = {".WAV", ".WMA", ".OGG", ".MP3"} 'etc...


Private Sub ExplorerDossier(ByVal NomDossier As String)
Dim ListeFichiers() As String = Directory.GetFiles(NomDossier)
Dim DesignationFichier As String
Dim Format As String
For Each DesignationFichier In ListeFichiers
Format = Path.GetExtension(DesignationFichier).ToUpper

If Array.IndexOf(ListeFormats, Format) < 0 Then Continue For

Dim ListViewItem As New ListViewItem()

LVI.Text = DesignationFichier. _
Substring(DOSSIER_IMAGES.Length + 1)
lvImages.Items.Add(ListViewItem)

Dim ListeSousDossiers As String() = _
Directory.GetDirectories(NomDossier)
Dim SousDossier As String

For Each SousDossier In ListeSousDossiers
ExplorerDossier(SousDossier)
Next
End Sub



Avec ceci tu devrais avoir le gros, j'espère que ça t'a aidé.
a++
_________________
Si la violence de résoud pas tous tes problèmes, c'est que tu ne frappes pas assez fort.

Lorsque Grenth s'étire Melandru tire. (->GW)
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé
ShadesOfGray

Postulant
 Postulant


H/F: H/F:Homme
Inscrit le: 27 Juin 2008
Age: 27
Messages: 8
Localisation: oui


MessagePosté le: Lun 07 Juil 2008, 05:56    Sujet du message: Répondre en citant

Sauf que ton code, c'est du .net, non? Mon code, c'est du vbs, donc on n'a pas a le compiler, ni a ouvrir un gui... et ca fonctionne avec tout windows equippe du Microsoft scripting engine (dont pratiquement tous les windows sont equippes)

Le code tel quel, on n'a qu'a glisser le dossier dessus pour avoir la liste des fichiers du dossier dans un fichier m3u... Mais j'avoue que d'inclure seulement les fichiers avec certaines extensions serait efficace.
_________________
Des fois,
j'ai peur un peu des fois,
j'ai peur beaucoup des fois,
mais des fois je nai pas peur du tout!
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Adresse AIM Yahoo Messenger MSN Messenger
Sculderoy

Créateur
 Créateur


H/F: H/F:Homme
Inscrit le: 15 Jan 2007
Age: 19
Messages: 1643
Localisation: Bordeaux

A travaillé sur :
Skull 13

MessagePosté le: Lun 07 Juil 2008, 07:19    Sujet du message: Répondre en citant

Citation:
c'est du vbs (on a sa fierte quand meme )

Ça ressemble quand même franchement a du .NET
_________________
Revenir en haut de page
Voir le profil de l'utilisateur Envoyer un message privé Envoyer un e-mail Visiter le site web de l'utilisateur MSN Messenger
Montrer les messages depuis:   
Poster un nouveau sujet   Répondre au sujet    Netophonix - Le forum Index du Forum -> Informatique : Questions/Réponses Toutes les heures sont au format GMT + 1 Heure
Page 1 sur 1

 
Sauter vers:  
Vous ne pouvez pas poster de nouveaux sujets dans ce forum
Vous ne pouvez pas répondre aux sujets dans ce forum
Vous ne pouvez pas éditer vos messages dans ce forum
Vous ne pouvez pas supprimer vos messages dans ce forum
Vous ne pouvez pas voter dans les sondages de ce forum




Powered by phpBB © 2001, 2005 phpBB Group
Traduction par : phpBB-fr.com