nPDebut=Position(sContenu,SansEspace(sBalise1))+Taille(SansEspace(sBalise1))
//Si sBalise2 contient quelque chose
SI PAS sBalise2~=" " ALORS
// 2éme balise nécessaire pour se positionner au début
nPDebut=Position(sContenu,SansEspace(sBalise2), nPDebut) +Taille(SansEspace(sBalise2))
FIN
// recherche de la balise de fin
nPFin=Position(sContenu,SansEspace(sBalise3), nPDebut)
// extraction du cours
sCours=SansEspace(sContenu[[nPDebut A nPFin]])
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=18&topic_id=5349&post_id=22089