Une liste de mots clés revient à
obtenir :
Hyper File
Test
Serveur
A partir de la saisie suivante : "Hyper File" Test
Serveur
//Recupération des mots
clés
sMotCles est une chaîne = SAI_RECH
sListeMot est une chaîne
unMotCle est une
chaîne
PosQuoteDeb est un entier
PosQuoteFin est un entier
i est
un entier
//On
vérifie si il y a des mots clés composés : "Hyper File"
PosQuoteDeb = Position(sMotCles,"""")
TANTQUE PosQuoteDeb <>
0
//Une expression comme
mot clé. Il faut la stocker et la supprimer de la liste.
PosQuoteFin = Position(sMotCles,"""",PosQuoteDeb+1)
sListeMot = sListemot+RC+sMotCles[[PosQuoteDeb+1 A PosQuoteFin-2]]
sMotCles = sMotCles[[1 A PosQuoteDeb-1]]+sMotCles[[PosQuoteFin+1 A]]
PosQuoteDeb =
Position(sMotCles,"""")
FIN
//On crée une liste avec ce qui reste
sMotCles = Remplace(sMotCles," ",RC)
sMotCles =
Remplace(sMotCles,"\","")
ListeMot =
sListeMot + RC+ sMotCles