AxVLCPlugin21 fails to open multiple files at the same time

[aalmoraa]

Hi all!

I'm using VB.net 2008 Express and trying to play multiple files in a form with AxVLCPlugin21, but I can't.
The program does not display any error message but only closes. Isn't it possible to play two or more files with
AxVLCPlugin21 or is there a specific way of managing it?

Thanks in advance...

[Lodda]

hi aalmoraa,

try this with an IMPORTDIALOG instead of OpenFileDialog1. Maybe you find ImportDialog in the Toolbox if you choose first the OpenFileDialog
sample is with ListBox1 & a Button I renamed it to btnOpenMedia

Private Sub btnOpenMedia_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpenMedia.Click
ImportDialog.FileName = Nothing ' "*.*"
ImportDialog.Filter = "Filme (*asf;*.avi;*.flv;*.mpg;*.mp4;*.mov;*.mkv;*.ts;*.wmv;*.vob)" & _
"|*asf;*.avi;*.flv;*.mpg;*.mp4;*.mov;*.mkv;*.ts;*.wmv;*.vob|" & _
"Musik (*.mp3;*wma;*.wav;*.mid;*.midi)|*.mp3;*wma;*.wav;*.mid;*.midi"
' without all files |All Files (*.*)|*.*"
ImportDialog.ShowDialog()
End Sub


Private Sub ImportDialog_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) _
Handles ImportDialog.FileOk
ImportDialogFileOk(ListBox1, ImportDialog, AxVLCPlugin21)
End Sub

Public Sub ImportDialogFileOk(ByVal playlist As ListBox, ByVal myDialog As OpenFileDialog, _
ByVal myPlayer As Object)
Dim Count As Int32

With Me 'or Name from your Form if you put this Sub in a Modul
Select Case .ImportDialog.FilterIndex
Case 1
'.....
Case 2
'.....
End Select
End With
For Each track As String In myDialog.FileNames()
playlist.Items.Add(track)
myPlayer.playlist.add(track)
Next
Count = Abspielliste.Items.Count
End Sub

[Lodda]

it's me again

change the line
"Count = Abspielliste.Items.Count" to Count = playllist.Items.Count