ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

CONVERTIR TOUT FICHIER WAV VALIDE EN MP3 ET l'INVERSE.   



L'auteur

ybenam
Algérie Algérie
Membre Simple
# 0000002080
enregistré le 21/04/2008


Fiche personnelle


Note des membres
pas de note

Contributions > 09 - Automation

CONVERTIR TOUT FICHIER WAV VALIDE EN MP3 ET l'INVERSE.
# 0000000622
ajouté le 20/06/2008 17:01:15 et modifié le 20/06/2008
consulté 11760 fois
Niveau débutant

Version(s) Foxpro :
VFP 6.0


Télécharger le ZIP (512.71 Ko)
Description
*On peut passer toute une vie à rechercher et passer à côté de petites choses qui simplifient
la vie sans avoir recours à un composant activeX....
*Lame.exe est un programme SounForge libre.Il est dans le zip.Il faut le recopier dans c:\windows\system32.
*il sert à convertir des fichiers WAV valides en MP3 avec diverses options au choix.
*Pour avoir le détail de l'aide ,taper dans une fenêtre DOS la ligne de commande
[ c:\windows\system32\lame.exe --help]
*LAME version 3.96.1 (http://lame.sourceforge.net/)
*usage: c:\windows\system32\lame.exe [options] [outfile]
* and/or can be "-", which means stdin/stdout.
*RECOMMENDED:
* lame -h input.wav output.mp3
*OPTIONS:
* -b bitrate set the bitrate, default 128 kbps
* -f fast mode (lower quality)
* -h higher quality, but a little slower. Recommended.
* -m mode (s)tereo, (j)oint, (m)ono
* default is (j) or (s) depending on bitrate
* -V n quality setting for VBR. default n=4
* --preset type type must be "medium", "standard", "extreme", "insane",
* or a value for an average desired bitrate and depending
* on the value specified, appropriate quality settings will
* be used.
* "--preset help" gives more info on these
* --priority type sets the process priority
* 0,1 = Low priority
* 2 = normal priority
* 3,4 = High priority
* --longhelp full list of options
NB: pour réaliser un enregistreur MP3, une solution serait de réaliser un enregistreur WAV
(olecontrol basé sur commandes MCI32 ou SendMCistrings) et d'ajouter la ligne de commande
du programme pour convertir en MP3.
Quelques exemples de commandes avec lame
(source : http://lame.cvs.sourceforge.net/*checkout*/lame/lame/doc/html/examples.html
Fixed bit rate 128kbps encoding:lame sample.wav sample.mp3
Fixed bit rate jstereo 128kbps encoding, high quality (recommended):lame -h sample.wav sample.mp3
Average bit rate 112kbps encoding:lame --abr 112 sample.wav sample.mp3
Fast encode, low quality (no psycho-acoustics):lame -f sample.wav sample.mp3
Variable bitrate (use -V n to adjust quality/filesize):lame -h -V 6 sample.wav sample.mp3
Streaming mono 22.05 kHz raw pcm, 24 kbps output:cat inputfile | lame -r -m m -b 24 -s 22.05 -- > output
Streaming mono 44.1 kHz raw pcm, with downsampling to 22.05 kHz:
cat inputfile | lame -r -m m -b 24 --resample 22.05 -- > output
NB: vous pouvez télécharger lame V3.97 513 Ko en zip au lien:
http://www.rarewares.org/dancer/dancer.php?f=lame-current
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// L'opération inverse consiste à décoder un fichier MP3 en WAV: remplacer la ligne
de commande par
run/n2 lame --decode input.mp3 output.wav
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

A propos il faut peut être rajouter une rubrique "MEDIAS" car je n'ai pas trouvé où mettre cet
article (peut être Trucs et astuces mais je préfère un chapitre à part tellement le sujet Médias
reste à developper !)
Code source :
*El Bayadh le 20 juin 2008  benameuryousfi1@gmail.com
*Convertir n'importe quel fichier WAV valide  en MP3

afile=getfile('wav')
if empty(afile)
return
endi
* même nom que le wav ici, avec l'extension MP3
if len(justpath(afile))<=3
bfile='"'+justpath(afile)+juststem(afile)+".mp3"+'"'
else
bfile='"'+justpath(afile)+"\"+juststem(afile)+".mp3"+'"'
endi

********************************
run/n2 lame  -h &afile  &bfile    &&c:\windows\system32\lame.exe
********************************

inkey(5)
&&lire le mp3
if messagebox("Lire "+bfile +"?",4+64,"Lecture mp3")=6
if file(&bfile)
DECLARE INTEGER ShellExecute IN shell32.dll ;
  INTEGER hndWin, STRING cAction, STRING cFileName, ;
  STRING cParams, STRING cDir, INTEGER nShowWin

ShellExecute(0,"open",bfile,"","",1)
else
messagebox("Le fichier "+bfile+" n'a pu être créé!",0+32,"Erreur")
endi

endi

Commentaires
le 20/06/2008, Michel Lévy a écrit :
La version que tu utilises date de juillet 2004, la dernière version stable est la 3.97 de septembre 2006.

Je ne pense pas que lame.exe soit un programme livré avec XP SP2.
C'est un projet démarré en OpenSource sur SourceForge en 1998, et aucun de ses auteurs ne semble avoir de lien avec Microsoft.

le 20/06/2008, ybenam a écrit :
Merci Michel !
Tu as raison ! en effet j'ai trouvé lame.exe dans mon répertoire c:\windows\system32 et il a dû étre importé par quelque logiciel de conversion .
la visite du site de Lame vous expose toutes les versions free de lame(version 3.97 stable,version béta 3.98 qui fait plus de 1.3Mo).pour bien faire les choses,je vous envoie le zip complet de lame v3.97 513 Ko qui contient l 'exe utilisé ici,la Dll et l'aide et manuels d'utilisation.Amicalement !


www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3