-
2 déc. 2004 à 14:57
cs_lacomm
Messages postés298Date d'inscriptionlundi 14 juin 2004StatutMembreDernière intervention 5 juillet 2013
-
2 déc. 2004 à 15:03
Bonjour à tous,
hé oui, je reviens encore avec le même sujet mais un problème différent.
Je dois repèrer une phrase comme celle-ci:
"Bonjour à tout le monde"
avec dans une table d'une base de données:
champ1: champ2:
bonjour tout le monde
bonsoir papa
maman
chef
Ca fonctionne bien, mais c'est extrêmement lent (10 tables avec 50 mots chacune +/-). C'est pour cela que j'aurais souhaité sortir de la boucle car si on a l'énoncé suivant:
"Salut tout le monde"
je voudrais être sûr que seul le champ1 sert de comparaison et interdise d'aller plus loin.
Et ca fonctionne comme ceci:
If champ1.recordcount <> 0 and champ2.recordcount <> 0 then
do while not champ1.EOF
'''''ici j'ajoute quelque chose qui ne marche pas
'''' if Instr(1, source(i), champ1(0) <>0 then
''''exit do
'''' else
do while not champ2.EOF
'pour reconnaître "mais bonjour à tout le monde"
modele1= source(1) Like "*" & " " & champ1(0) & " " & "*" & " " &
champ2(0)
monresul=modele1
if monresul= true then
msgbox "ok"
exit do
end if
rent2.movenext
loop
rent2.movefirst
rent1.movenext
''''' end if
loop
end if
set champ1=nothing
set champ2=nothing
ma question est la suivante:
est-il possible de sortir de la comparaison dès que l'on se rend compte que le champ1 n'est pas présent dans la phrase à comparer ?