delete all files from sd card

[fanfalveto]

in device orange montecarlo this run ok

Dim fs As MLfiles
Dim sd As String
sd = fs.Sdcard
fs.rmrf(sd)

but for example htc desire and sony xperia not runs ok.
please how i can delete all files from sd card?

 

[fanfalveto]

Now with this i can delete files in root path but not delete folders,i use mlfiles library,this delete files and folders in montecarlo orange device but only files in htc bravo and sony xperia

Dim allsdcard As List
allsdcard.Initialize
Dim fs As MLfiles
Dim sd As String  
allsdcard.AddAll(File.ListFiles(File.DirRootExternal))
For i= allsdcard.Size-1 To 0 Step -1
 MyFile = allsdcard.Get(i)
 File.Delete(File.DirRootExternal,MyFile )
sd = (File.DirRootExternal&"/"&MyFile)
Log(sd)
fs.rmrf(sd)
Next

i see a post where says about "vold.fstab" but i can´t delete folders in all devices.
Any idea please? thank you