Transformer MP3 en WAV (via Script)

‘nous listons l’ensemble des fichier MP3 se trouvant dans le dossier souhaiter

Dim ObjShell, Afile, Thefiles, avecextension, sansextension
Set FSo = WScript.CreateObject(« Scripting.FileSystemObject »)
set Afolder=FSO.GetFolder(« E:\test »)
Set TheFiles = Afolder.Files
On Error Resume Next
For Each AFile In TheFiles
If UCase(FSO.GetExtensionName(AFile.Path)) = « MP3 » then
avecextension=FSO.GetAbsolutePathName(AFile)
sansextension=avecextension’-3 caracteres
MsgBox(sansextension)
End if
Next

‘Dim oShell
‘Set oShell = WScript.CreateObject (« WSCript.shell »)
‘oShell.Run (« cmd /K C:\windows\system32\lame.exe –decode -h «  » » & « E:\test\Realize.mp3 » & «  » » «  » » & « E:\test\Realize.wav » & «  » » »)

‘Penser a copier les fichiers lame.exe et lame_enc.dll dans c:\windows\system32
‘le fichier zip se trouve sous ce lien