Получение списка mp3 файлов на сайте и их поочередное воспроизведение - VB

Формулировка задачи:

Inv.DS давал такой код:

                    Листинг программы
                
Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
 
Private Sub Command1_Click()
Call mciExecute("play http://mptron.com/data/mp3/09112011/gleb_klubni4ka__evgenii_kuzin_-_ya_tvoi_geroi.mp3") 'чтобы воспроизвести файл
End Sub
 
Private Sub Command2_Click()
Call mciExecute("close http://mptron.com/data/mp3/09112011/gleb_klubni4ka__evgenii_kuzin_-_ya_tvoi_geroi.mp3") 'чтобы закрыть файл
End Sub

Но здесь можно воспроизвести только одну песню, а как сделать так: У меня на сайте в папке (к примеру site.ru/music) есть много песен, как сделать так, чтобы при нажатии кнопки все эти песни начали проигрываться по-очереди??? А так же можно поставить воспроизведение на паузу....

Решение задачи: «Получение списка mp3 файлов на сайте и их поочередное воспроизведение»

textual
                            Листинг программы 
                        
Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
 
Private Sub Command1_Click()
Call mciExecute("play http://goodfiles.ucoz.com/ifollow.mp3") 'Г·ГІГ®ГЎГ» ГўГ®Г±ГЇГ°Г®ГЁГ§ГўГҐГ±ГІГЁ ГґГ*Г©Г«
End Sub
 
Private Sub Command2_Click()
Call mciExecute("close http://goodfiles.ucoz.com/ifollow.mp3") 'Г·ГІГ®ГЎГ» Г§Г*ГЄГ°Г»ГІГј ГґГ*Г©Г«
End Sub