comment lister les fichier mp3 du dossier ou se trouve le exe de mon programe?

Question

salut
je voudrait faire un lecteur mp3 et pour quil soit complet il faudrait que je puisse afiché les nom des fichier mp3 qui se trouve avec l'éxécutable dans un listbox.

quelqun pourait maider?

ps:je suis en vb 2008

a+

Genildf · Answer

Dim listdir() As String
        Dim file As String
        listdir = Directory.GetFiles("ton chemin")
for i = 0 to listdir.Length - 1
if mid(listdir(i),len(listdir(i)-3) = "mp3" then
combobox.items.add("listdir(i)")
end if
next

Voila je sais pas si sa marche pareil en VB6

Genildf · Answer

Dim listdir() As String
          listdir = Directory.GetFiles("ton chemin")
for i = 0 to listdir.Length - 1
if mid(listdir(i),len(listdir(i)-3) = "mp3" then
combobox.items.add(listdir(i))
end if
next

Voila je sais pas si sa marche pareil en VB6

Edit : voila qui est mieu

jx53 · Answer

ok merci Genildf mais maintenant il faut remplacé le chemin dacces par une commande ki fera quil listera les mp3 du dossier de laplication car moi je sais pas ou les utilisateur von mettre mon programe, tu sais comment faire sa?

a+

Genildf · Answer

Application.StartupPath() si tu vuet que ton chemin soit celui de ton appli

ou alors

FolderBrowserDialog1.SelectedPath si tu veut ouvrir une boite de dialog pour choisir le dossier

PS pense a msdn il est très utile si tu cherche quelque chose ou même google

jx53 · Answer

désolé mais le code ne marche pas,  sa me dit Directory nest pas déclarer, je met dim Directory as string sa me dit getfiles nest pas un membre de string des idées?  et aussi, Application.StartupPath() je le met ou?

merci davance

a+

cs_Jack · Answer

Salut
Recherche effectuée sur le site : http://www.vbfrance.com/k-code-dir.aspx

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_Jack · Answer

Sachant que le répertoire de l'EXE est   App.Path  en VB6
La syntaxe fournie par Genildf doit, je pense, être du VB.Net

cs_Orohena · Answer

Bonjour

En .Net : My.Computer.FileSystem.CurrentDirectory

Amicalement

jx53 · Answer

bon bin voila jai trouvé:

Private
Sub Form1_Load(
ByVal sender 
As System.Object, 
ByVal e 
As System.EventArgs) 
Handles
MyBase.Load

My.Computer.FileSystem.CurrentDirectory = Application.StartupPath

For
Each File 
As
String
In
My.Computer.FileSystem.GetFiles(
My.Computer.FileSystem.CurrentDirectory, FileIO.SearchOption.SearchTopLevelOnly, 
"*.mp3")ListBox1.Items.Add(

My.Computer.FileSystem.GetFileInfo(File).Name)

Next

End
Sub

et voila!

merci davoir éssaillé

a+

cs_Jack · Answer

Pourquoi avoir posté ta question dans la catégorie VB6 alors que tu cherchais du .Net ?
(pour faire gagner du temps à tout le monde ?)

jx53 · Answer

jen sais rien moi je suis sur vb 2008 express édition, ces du .net sa?  ya pas de section pour vb 2008 express édition mais les code vb6 marche avec si on les modifi un peut

c tout

a+

cs_Orohena · Answer

Salut

Amateur débutant ou professionnel chevronné, tu es développeur sur un forum de développeurs. Si tu utilises vb2008 express edition, tu devrais savoir que tu utilises .net framework 3.5. (fenêtre A propos de Microsoft Visual Basic 2008 Express).

Outre le fait que ça fait perdre du temps à tout le monde, toutes ces discussions mal engagées - car malheureusement ton cas n'est pas isolé - tirent le niveau du forum vers le bas.

Amicalement

Comment lister les fichier mp3 du dossier ou se trouve le exe de mon programe?

12 réponses

Votre réponse