[RESOLVED] how to play random mp3 files in a folder via VB6

Hello

Suppose I have an app with Command Button ( Command1)

and I have a folder have a lot of songs for example , (Audio)

I want a code when I click on command the songs in folder (Audio) play random ( shuffle )

i tried to make a random play list in windows media player and run it via VB6 using this code , but every time it opens , no shuffle

all what I need is playing random play list in VB

Thanks