Bonjour à tous
je vous explique mon problème.
J'ai une analyse qui se nome "Base" avec 3 colonnes "IDBASE","Noms","Définitions".
Dans ma fenêtre, j'ai un champ de recherche nommé "SAI_Saisie1". En dessous j'ai une table nommé "TABLE_Base" ou s'affiche tous les Noms.
Lorsque je fait une recherche dans le champ recherche sa me cherche le mot demander sans souci. Ce que je cherche à faire est si je recherche un mot qui ne se trouve pas dans la base qu'il me renvoi sur un autre ..plan.
Dans mon champ "SAI_Saisie1" j'ai (A chaque modification):
Dans la table "TABLE_Base" j'ai (Sélection d'une ligne) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 TableSelectPlus(TABLE_Base,TableCherche(Noms,SansEspace(SAI_Saisie1),Faux)) SI HTrouve(Base) ALORS ExécuteTraitement(TABLE_Base,trtSélection) FIN
J'ai tester avec :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 sRepExe est une chaîne SI EnModeTest() ALORS sRepExe = fRepEnCours() SINON sRepExe = Remplace(ExeInfo(exeRépertoire),"\","/") FIN SI HTrouve(Base) ALORS test..Plan = 1 HTM_HTML1=Remplace(Base.Définitions,"*Chemin*",sRepExe+"/Medias") FIN
Là sa m'ouvre bien le ..plan 2 mais directement à la première lettre écrite dans le champ de recherche.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 sRepExe est une chaîne SI EnModeTest() ALORS sRepExe = fRepEnCours() SINON sRepExe = Remplace(ExeInfo(exeRépertoire),"\","/") FIN HLitRecherche(Base,Noms,TABLE_Base[TableSelect(TABLE_Base)]) SI HTrouve(Base) = Vrai ALORS test..Plan = 1 HTM_HTML2=Remplace(Base.Définitions,"*Chemin*",sRepExe+"/Medias") FIN SI PAS HTrouve(Base) = Faux ALORS test..Plan = 2 FIN
J'ai encore tester avec :
Là sa me fait rien sa recherche juste et s’arrête si il y a une faute.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 sRepExe est une chaîne SI EnModeTest() ALORS sRepExe = fRepEnCours() SINON sRepExe = Remplace(ExeInfo(exeRépertoire),"\","/") FIN HLitRecherche(Base,Noms,TABLE_Base[TableSelect(TABLE_Base)]) SI HTrouve(Base) ALORS test..Plan = 1 HTM_HTML2=Remplace(Base.Définitions,"*Chemin*",sRepExe+"/Medias") SINON test..Plan = 2 FIN
J'ai donc tester le HTrouve avec :
que je fasse une bonne ou une mauvaise recherche, j'ai toujours le droit à : "Enregistrement trouvé"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 sRepExe est une chaîne SI EnModeTest() ALORS sRepExe = fRepEnCours() SINON sRepExe = Remplace(ExeInfo(exeRépertoire),"\","/") FIN HLitRecherche(Base,Noms,TABLE_Base[TableSelect(TABLE_Base)]) SI HTrouve(Base) ALORS ExécuteTraitement(TABLE_Base,trtSélection) Info("Enregistrement trouvé") SINON Erreur("Aucun enregistrement ne correspond") FIN
Si quelqu'un pourrais me donner un coup de main.
amicalement
Partager