Discussion :

[Menadel]

Bonsoir tout le monde

j'ai une fenetre composée d'un champ combo(combo1) avec deux champs de saisies (sai_nom et sai_prenom ),un bouton Recherche (BTN_Rech) et une table (Table1).
j'aimerais que si je clique sur le bouton Recherche (BTN_Rech) la table (Table1) affiche le resultat de la requete en fonction des paramètres entrés dans:

le champ combo(combo1) et les deux autres champs (sai_nom et sai_prenom ).

Dans BTN_Rech voici le code que j 'ecris:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
HExécuteRequête(REQ_Rech_Clients,hRequêteDéfaut,combo1,sai_nom,sai_prenom)
TableAffiche(Table1,taDébut)

Dans le code d'initialisation de Table1 j'écris le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

HExécuteRequête(REQ_Rech_Clients,hRequêteDéfaut,combo1,sai_nom,sai_prenom)

Mais lorsque j'execute ma requête il ne se passe rien,quelqu'un pourrait il m'aider?
Merci d'avance.

[Nicolas_Jeanneau]

Bonjour,

il nous manque la requête et la table est-elle reliée à la requête ou pas ?

à bientôt,

Nicolas

[leonidas34]

il manque aussi le code de retour d'execution de l'instruction Hexecuterequete ainsi que le message d'erreur en cas d'erreur.

[Menadel]

Voici le code de ma requête:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
SELECT 
	CLIENTS.CODE_CLTS AS CODE_CLTS,	
	CLIENTS.COD_TYP_CLTS AS COD_TYP_CLTS,	
	CLIENTS.NOM_CLTS AS NOM_CLTS,	
	CLIENTS.PRENOM_CLIENTS AS PRENOM_CLIENTS,	
	CLIENTS.TELE_CLIENTS AS TELE_CLIENTS,	
	CLIENTS.FAX_CLIENTS AS FAX_CLIENTS,	
	CLIENTS.MAIL_CLIENTS AS MAIL_CLIENTS
FROM 
	CLIENTS
WHERE 
	CLIENTS.COD_TYP_CLTS LIKE {PType}%
	AND	CLIENTS.NOM_CLTS LIKE {PNom}%
	AND	CLIENTS.PRENOM_CLIENTS LIKE {Pprenom}%

Concernant la table elle est réliée à la requête par programmation, voici le code (dans l'initialisation de la table):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
combo1..LiaisonFichier="REQ_Rech_Clients.COD_TYP_CLTS"
Table1..LiaisonFichier="REQ_Rech_Clients"
Table1.Email..LiaisonFichier="REQ_Rech_Clients.MAIL_CLIENTS"
Table1.Fax..LiaisonFichier="REQ_Rech_Clients.FAX_CLIENTS"
Table1.Nom..LiaisonFichier="REQ_Rech_Clients.NOM_CLTS"
Table1.Prenom..LiaisonFichier="REQ_Rech_Clients.PRENOM_CLIENTS"
Table1.Téléphone..LiaisonFichier="REQ_Rech_Clients.TELE_CLIENTS"

-Je n'ai pas créé de code en cas de message d'erreur
-Pour le retour d'execution de l'instruction Hexecuterequete,je ne comprend pas ,pourriez vous m'expliquez?

[Nicolas_Jeanneau]

En fait il faudrait relier la table dans la description et pointer vers la requête. Cela devrait suffire pour l'alimentation. Car là, si tu mets juste ce code dans l'initialisation, ça ne fera rien car la reqûete n'est pas encore initialisée et la table n'est pas remplie avec les fonctions TableAjoute ou TableAjouteLigne.

Si tu veux vraiment faire une alimentation par programmation, il faut que tu parcours le résultat de la requête et que tu fasses TableAjouteLigne avec les champs de la requête.

[Menadel]

j'ai relié la table à la requête,mais lorsque j'exécute la table m'affiche tous les enregistrements; alors que j'ai posé des conditions avec les paramètres.

[PaulNero]

Bonjour l'ami,
dans ton

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

HExécuteRequête(REQ_Rech_Clients,hRequêteDéfaut,combo1,sai_nom,sai_prenom)

combo1 est t-il un paramètre aussi? si oui, je t'invite à mettre combo1..valeuraffichée.
Sinon tu peux l'effacer et écrire simplement:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

HExécuteRequête(REQ_Rech_Clients,hRequêteDéfaut,sai_nom,sai_prenom)

dans selection d'une ligne de la combo ou autre bouton.
Plus clairement, je voudrais te dire que l'execution de ta requête et le remplissage de ta table doit dépendre de l'utilisateur.En effet, en remplissant le nom,prénom et valeur de la combo ça doit t'allimenter la table selon ces valeurs.



cordialement

[Nicolas_Jeanneau]

Lors de l'ouverture de la fenêtre, tes champs sont vierges donc la table affiche tous les enregistrements et c'est normal. Si tu veux passer des paramètres dès l'ouverture, il faut dans l'initialisation de la table refaire le passage de paramètres.

Lorsque tu exécutes le code derrière le bouton, tu dois le positionner sur la partie clic et tu dois reprendre l'ensemble des paramètres que tu as saisis.

par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
HAnnuleDelcaration(REQ_Rech_Clients)
REQ_Rech_Clients.PType = combo1
REQ_Rech_Clients.PNom = sai_nom
REQ_Rech_Clients.Pprenom = sai_prenom
HExécuteRequête(REQ_Rech_Clients,hRequêteDéfaut)
TableAffiche(Table1)

[Menadel]

Ok ça marche maintenant après avoir mis combo1..valeuraffiché,merci à PaulNero .
j'ai aussi testé la solution de Nicolas Jeanneau, ça marche aussi.

Merci à Tous de m'avoir aidé.