Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 10/01/2012, 15h58   #1
Invité de passage
 
Femme
Étudiant
Inscription : janvier 2012
Messages : 38
Détails du profil
Informations personnelles :
Sexe : Femme
Localisation : France, Pas de Calais (Nord Pas de Calais)

Informations professionnelles :
Activité : Étudiant
Secteur : High Tech - Éditeur de logiciels

Informations forums :
Inscription : janvier 2012
Messages : 38
Points : 4
Points : 4
Par défaut Problème d'affichage de résultat d'une requete dans champs de texte

Bonjour,

J'essaye en vain d'afficher le résultat de ma requete dans une zone de texte de mon formulaire.

J'utilise donc des zones de liste avec ce code ci:

Code :
1
2
3
 
uSQL1 = "SELECT [Stock].[Type] FROM Stock where Reference= Texte0 "
Liste1.RowSource = uSQL1
Cela fonctionne très bien sauf que pour me servir du résultat de ma requete, je dois tout le temps écrire du code pour dire que le premier élément de ma liste est séléctionné afin de pouvoir m'en servir.Cela est génant du fait que je dois faire une vingtaine de requete avec des zones de liste.

J'aimerai donc tout simplifier en utilisant que des zones de texte.

Pouvez vous m'aider ? Toutes les syntaxes que je trouve dans les forums me retourne que des erreurs et j'aimerai bien si possible que l'on m'explique comment coder cela.

D'avance merci pour vos réponses
Bubulle232 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 10/01/2012, 22h06   #2
Modérateur
 
Homme René MAROT
Inscription : octobre 2005
Messages : 5 479
Détails du profil
Informations personnelles :
Nom : Homme René MAROT
Localisation : Canada

Informations forums :
Inscription : octobre 2005
Messages : 5 479
Points : 7 568
Points : 7 568
La solution qui me parait la plus simple : DFirst()

Quelque chose comme :
Code :
Me.TonChampTexte=DFirst("Type","Stock","Reference=" & Me.Texte0)
Va te retourner le 1er enr dont reférence est égale au champ Texte0 de ton formulaire.

Note que si DFirst() ne trouve pas la donnée il retourne Null.

A+
__________________
Vous voulez une réponse rapide et efficace à vos questions téchniques ? Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
marot_r est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 11/01/2012, 09h48   #3
Invité de passage
 
Femme
Étudiant
Inscription : janvier 2012
Messages : 38
Détails du profil
Informations personnelles :
Sexe : Femme
Localisation : France, Pas de Calais (Nord Pas de Calais)

Informations professionnelles :
Activité : Étudiant
Secteur : High Tech - Éditeur de logiciels

Informations forums :
Inscription : janvier 2012
Messages : 38
Points : 4
Points : 4
Bonjour ,

j'essaye d'appliquer votre fonction à cette requete, ce qui donne :

Code :
1
2
3
4
5
 
 
Me.txt_adresse1 = DFirst("adresse1", "Client", "Nom=" & Me.txt_nom)
 
'select adresse1 from client where Nom = txt_nom  --> ma requete
J'ai l'erreur d'execution 2471 qui me dit que l'expression entré comme paramètre de requete est à l'origine de l'erreur suivante " _____"
(_____ est le nom de mon client que j'ai saisie dans la zone de texte txt_nom)

Si vous pouviez m'éclairer...
Bubulle232 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/01/2012, 19h12   #4
Modérateur
 
Homme René MAROT
Inscription : octobre 2005
Messages : 5 479
Détails du profil
Informations personnelles :
Nom : Homme René MAROT
Localisation : Canada

Informations forums :
Inscription : octobre 2005
Messages : 5 479
Points : 7 568
Points : 7 568
Essaye :

Code :
Me.txt_adresse1 = DFirst("adresse1", "Client", "Nom=""" & Me.txt_nom & """")
Ça devrait être correct.

A+
__________________
Vous voulez une réponse rapide et efficace à vos questions téchniques ? Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
marot_r est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 22h36.


 
 
 
 
Partenaires

Hébergement Web