Afficher résultat de requête dans une zone de texte

**paflolo** · 29/03/2006, 19h03

Salut,
voilà j'explique mon probleme.
J'ai créé un formulaire avec 3 menus déroulants:
les 2 premiers prennent les dates contenues dans ma base de données et le 3eme renvoie les différents type de paiement (CB,cheque,etc....).
J'arrive a mettre un bouton qui execute la requete (somme des cheques ou CB pour periode donnée) mais celà m'affiche le résultat dans une fenetre pas belle qui s'ouvre par dessus le formulaire.
Je voudrais afficher le résultat de ma requete dans une zone de texte en dessous de mon bouton "valider" (qui se trouve en dessous des menus deroulants).
J'ai essayer en insérant un sous-formulaire mais j'ai pas réussi...çà m'affiche "#Nom?" dans la zone de texte...
Pouvez-vous m'aider SVP j'en peux plus!! Sauvez moi!

**tamerlan** · 29/03/2006, 21h37

Salut
Pour faire cela, je pense qu il faudrait que tu mettes ta requete dans le code du bouton

Code :

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

1
2
SQL = "SELECT ......"
Texte = SQL

et non un bouton qui exécute une requete préalablement créé.
J espere que tu comprendra ce que je veux dire.

**tamerlan** · 29/03/2006, 21h38

par contre je sais pas ca va marcher dans un champ texte. Mais ca fonctionne dans une champ Liste

**Heureux-oli** · 29/03/2006, 22h05

Tu peux aussi faire glisser la réquête sur ton formulaire en mode design, sur ton bonton tu met le code suivant

Code :

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

1
2
3
 
 
    [MonNouveauSubForm].requery

Avec MonNouveauSubForm étant le nom du sous formulaire crée par Access lors du déposer de ta requête.

Haaaa ce bon vieux drag & drop ooops Glisser/Déposer

**paflolo** · 30/03/2006, 10h14

ce la ne marche toujours pas!!!
quand je fais le glisser déposer en plus çà me met qu'il n'y a aucun enregistrement...
çà vient du fait que je ma requete se sert des valeurs des menus deroulants??
j'y arrive pas... j'en peux plus!!
A l'aide...........

**paflolo** · 30/03/2006, 14h19

Quelqu'un peut-il me tirer de ce mauvais pas SVP??

**tamerlan** · 30/03/2006, 15h59

en résumé tu veux faire une recherche multicritères.
tu peux t aider de ce tutoriel http://cafeine.developpez.com/access...echerchemulti/

1 - tu mets un champs liste (indépendant) en dessous de tes menus déroulants

2 - tu vas dans la propriete "Sur Clic" de ton bouton --> générateur de code --> une fenetre VB s'ouvre.

3 - Dans cette procédure, tu déclares une variable (ex : dim SQL as tring)
puis tu mets ta requete

Code :

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

SQL = "SELECT ... FROM ... WHERE ... AND condition1 = [forms]![NomDeTonFormulaire]![NomDeTaZoneDeListe1] AND condition2 = [forms]![NomDeTonFormulaire]![NomDeTaZoneDeListe2] ..."

et enfin tu affectes le résultat de ta requete placé dans ta variable SQL dans la liste

Code :

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

Liste = SQL

Normalement ca doit marcher

**paflolo** · 30/03/2006, 17h11

çà ne marche toujours pas...
j'ai même essayer de mettre la requete la plus simple possible mais lorsque je clique sur mon bouton, rien ne s'affiche dans la liste...ni dans une zone de texte....
HELPPP

**Arkham46** · 30/03/2006, 17h24

slt,

en gros, si je comprend, ta requête ne renvoie qu'une seule ligne, d'où tu voudrais extraire un champ
donc pas la peine de faire un formulaire pour un seul champ, c'est plus simple de le mettre dans une zone de texte, c'est ça?

si c'est ça essaye avec DLookUp dans la source de ton contrôle zone de texte :

Code :

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

=DLookUp("TonChamp","TaRequête","")

Remarque que si ta requête est simple tu peux peut-être t'en tirer en mettant tout dans un DLookUp, un DSum, ou autre...

**cafeine** · 30/03/2006, 17h26

Hello,

ce n'est pas du tout la bonne manière de procéder ...

il faut ouvrir un Recordset et y piocher la valeur que tu souhaites ...

Code :

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

1
2
3
4
5
6
7
8
9
Dim rec as dao.recordset
 
set rec = currentdb.openrecordset( "Select MonChamp From Matable WHERE moncritere = 'toto'", dbopensnapshot)
 
Forms("MonFormulaireChargé").Controls("MonTextBox") = rec.fields("MonChamp")
 
rec.close
 
set rec = Nothing

**paflolo** · 30/03/2006, 19h19

Je le met où ce code pour le Recordset??
Sur le bouton?
sur la zone de texte??
où??

çà marche pas...

**cafeine** · 30/03/2006, 19h20

Envoyé par paflolo

Je le met où ce code pour le Recordset??
Sur le bouton?
sur la zone de texte??
où??

çà marche pas...

sur l'événement clic du bouton ...

**paflolo** · 31/03/2006, 10h20

çà ne marche toujours pas...
quand j'écris une requete basique çà fonctionne!
par contre, quand je mets la requete que je veux, en faisant référence aux menus déroulants du formulaire, çà ne marche plus!
J'utilise un Sum(), que dois-je mettre aprés le rec.fields("monchamp") car quand je mets le sum() çà marche pas non plus...
Pourtant la requete est BONNE, car elle fonctionne! C'est juste pour l'afficher dans le textbox que çà ne marche pas!
çà met "trop peu de parametres attendus"...pourtant y a tout!
HELPP, je vais jamais y arriver...

**cafeine** · 31/03/2006, 11h07

Hello,

on en est à 12 messages sur ce fil de discussion, il faudrait que tu nous donnes ton code pour que nous voyons où tu en es ...

**pepitok** · 11/07/2006, 18h38

"Hello,

ce n'est pas du tout la bonne manière de procéder ...

il faut ouvrir un Recordset et y piocher la valeur que tu souhaites ..."

Bonjour , je me permets d ecrire car javais exactement le probleme et je tenais a te dire merci Cafeine !!!

En effet, je suis actuellement en stage, et etant etudiant d une ecole a vocation plutot meca (ENSAM), je ne suis pas excellent en info.
Or avec un tel forum, c'est la panacee !!! J ai trouve toutes les reponses a mes questions sur access ici comme le code que tu a mis ci dessus pour afficher le result dune requete ds une textbox, ou alor le tutorial sur la rech multi requete, c'est genial !!

Bonne continuation et pravo pour votre competence pertinente !!!

Cedric

**yapolaurent** · 22/07/2021, 19h55

salut famille je vous dis un grand merci d'avoir actualisé mon compte
j'ai un problème et j'ai besoin de votre aide merci d'avance
le problème est j'ai créé une application avec access et dans mon etat je veux afficher le nom d'un champ de ma requette ( R IEP) sur mon etat
ma requette compte 3 champs d'expressions qui sont:
monacte avec code d'expression monacte: ExtracChaîne([NomIEP];1;1)[/COLOR]
moniep code expression moniep: VraiFaux([monacte]="A" Ou "I";" INSPECTION DE L'ENSEIGNEMENT PRESCOLAIRE ET PRIMAIRE D'" & [NomIEP];"INSPECTION DE L'ENSEIGNEMENT PRESCOLAIRE ET PRIMAIRE DE" & [NomIEP])
madren code d'expression madren: VraiFaux(ExtracChaîne([Nomdden];1;1)="A" Ou "E" Ou "I" Ou "O" Ou "U" Ou "Y";"DIRECTION REGIONALE D' " & [Nomdden];"DIRECTION REGIONALE DE " & [Nomdden])
alors avec ces codes lorsque je voix le resultat dans mon etat avec un champ indépendant je constate que je il une erreur dans le code VraiFaux([monacte]="A" Ou "I";" INSPECTION DE L'ENSEIGNEMENT PRESCOLAIRE ET PRIMAIRE D'" & [NomIEP];"INSPECTION DE L'ENSEIGNEMENT PRESCOLAIRE ET PRIMAIRE DE" & [NomIEP])
alors aidez moi à rsoudre ce problème.

**tee_grandbois** · 22/07/2021, 22h09

bonsoir,
il faut répéter le nom du champ à chaque comparaison :

Code :

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

VraiFaux([monacte]="A" Ou [monacte]="I"; ...

on peut utiliser également In quand l'expression devient trop complexe:

Code :

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

VraiFaux(ExtracChaîne([Nomdden];1;1) In("A";"E";"I";"O";"U";"Y"); ...

PS:il faut éviter de ressortir des très vieux messages pour poster

**yapolaurent** · 27/07/2021, 13h58

MERCI tee_grandbois tee_grandbois est actuellement connecté
Expert éminent sénior

Tu est un Chef j'ai utilisé ton code et ça marche parfaitement encore merci...

**yapolaurent** · 08/03/2022, 19h23

aidez moi je cherche un code vba pour vider un ou des enregistrements d'une table
un code pour faire un classement par ordre de mérite des élèves
merci cordialement

**yapolaurent** · 22/03/2022, 13h08

aidez moi
j'ai crée deux tables la première est la table élève contenant le matricule, nom-élève et le sexe élève. la deuxième table est la table photo contenant la photo_élève et le matricule_élève alors je veux créer un dossier photo et y mettre les photos élève renommer par matricule élève. ensuite à partir d'un code vba ou macro importer les photos dans la table élève de sorte que chaque photo_élève correspond au nom de chaque élève. comme je ne sais pas comment le faire je prie de m'aider à faire cela
cordialement j'attends vos idée merci

Afficher résultat de requête dans une zone de texte

IHM

Discussions similaires

Partager

Partager