Finding music?

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Neochrome

Is this going to be just one file? thats allowed in that directory?

myDir=ReadDir(folder$) 

; Let's loop forever until we run out of files/folders to list! 
Repeat 
; Assign the next entry in the folder to file$ 
file$=NextFile$(myDir) 

; If there isn't another one, let's exit this loop 
If file$="" Then Exit 

; Use FileType to determine if it is a folder (value 2) or a file and print results 
If FileType(folder$+""+file$) = 2 Then
	If Instr(file$,".mp3") Then
		Print "File:" + file$
	EndIf
End If 
Forever 

; Properly close the open folder 
CloseDir myDir

You will be abe to see whats going on