Vis liste VB.

[danfredr]

Hei. hvordan får får jeg en opp en liste over alle filene i c:mp3 ?

hva er koden får når jeg dobbelklikker så starter programet ?

 

Dette er i VB 6

[OCSpro]

explorer.exe?

 

FileListBox hvor du setter path = c:mp3

 

File1.Path = "c:mp3"

 

For å åpne riktig program må du tolke endelesen på filnavnet, og deretter hente ut programmet for å åpne den filtypen i windows registeret, og bruke shell kommandoen.

 

Akkurat det kan jeg ikke, og vet ikke hvor det ligger i register filen sry... søk deg heller fram på http://www.planet-source-code.com, sikker på at jeg ahr sett noe lignende der... lykke til!

[GeirGrusom]

Public Sub PopulateListBox(ByRef lst As ListBox)

 Dim d As String

 d = Dir("C:*.mp3")

 Do Until d = ""

   lst.AddItem d

   d = Dir()

 Loop Until d = ""

End Function

Public Sub ListBox_DoubleClick()

 ShellExecute("open", ListBox.SelectedItem)

End Sub

[danfredr]

Går det ant å jøre dette med en popupmenu ?

[danfredr]

Nå har jeg lagt inn denne koden i Command1 som Clikk

 

File1.Path = "c:\mp3"

 

men den funker perfekt ! men hvordan skal jeg fixe son at når jeg

 

dubbel klikker på en fil i list1 så opnes filen i korekt program ?