Parcourir une BD (3): optimisation

- 2 déc. 2004 à 14:57
cs_lacomm Messages postés 298 Date d'inscription lundi 14 juin 2004 Statut Membre Derniè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 ?

Un grand merci

1 réponse

cs_lacomm Messages postés 298 Date d'inscription lundi 14 juin 2004 Statut Membre Dernière intervention 5 juillet 2013 1
2 déc. 2004 à 15:03
LaComm

Oups,
désolé, la mise en page nest pas conservée et mon nom n'apparaît pas (Lacomm)
0
Rejoignez-nous