Bonjour,
J'ai un formulaire avec une zone de texte, dans cette zone=20
j'aimerai que la valeur que je rentre me permette=20
d'executer une requete sql,voici un exemple:
je rentre "FR" dans ma zone de texte, ensuite je clique=20
sur un bouton et dans mon code,je dois r=E9cuperer "FR" pour=20
le mettre ds ma requete <Select nom_pays from pays where=20
nom_pays=3D"FR*"> puis je voudrai l'afficher dans une zone=20
de liste.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour,
Pas sur d'avoir bien compris ce que tu veux, mais avec...
Un formulaire ayant : - Une zone de texte nommée txtSaisiePays - Une zone de liste nommée ListePays - Un bouton de commande nommé Commande0 - ...
Une table appelée tPays contenant entre autre le nom des pays (NomPays)
alors
Sur l'évènement clic du bouton, tu remplis la zone de liste avec tous les pays dont le nom commence par les caractères saisis dans la zone de texte txtSaisiePays
Private Sub Commande0_Click() Dim strSQL As String strSQL = "Select NomPays from tPays where NomPays like '" & Me! txtSaisiePays & "*' order by NomPays;" Me!ListePays.RowSourceType = "Table/Requête" Me!ListePays.RowSource = strSQL End Sub
C'est ce que tu voulais ?
A+ Eric
"Julien" écrivait news:1da101c46fc1 $240a42c0$:
Bonjour, J'ai un formulaire avec une zone de texte, dans cette zone j'aimerai que la valeur que je rentre me permette d'executer une requete sql,voici un exemple:
je rentre "FR" dans ma zone de texte, ensuite je clique sur un bouton et dans mon code,je dois récuperer "FR" pour le mettre ds ma requete <Select nom_pays from pays where nom_pays="FR*"> puis je voudrai l'afficher dans une zone de liste.
Merci d'avance
Bonjour,
Pas sur d'avoir bien compris ce que tu veux, mais avec...
Un formulaire ayant :
- Une zone de texte nommée txtSaisiePays
- Une zone de liste nommée ListePays
- Un bouton de commande nommé Commande0
- ...
Une table appelée tPays contenant entre autre le nom des pays (NomPays)
alors
Sur l'évènement clic du bouton, tu remplis la zone de liste avec tous les
pays dont le nom commence par les caractères saisis dans la zone de texte
txtSaisiePays
Private Sub Commande0_Click()
Dim strSQL As String
strSQL = "Select NomPays from tPays where NomPays like '" & Me!
txtSaisiePays & "*' order by NomPays;"
Me!ListePays.RowSourceType = "Table/Requête"
Me!ListePays.RowSource = strSQL
End Sub
Bonjour,
J'ai un formulaire avec une zone de texte, dans cette zone
j'aimerai que la valeur que je rentre me permette
d'executer une requete sql,voici un exemple:
je rentre "FR" dans ma zone de texte, ensuite je clique
sur un bouton et dans mon code,je dois récuperer "FR" pour
le mettre ds ma requete <Select nom_pays from pays where
nom_pays="FR*"> puis je voudrai l'afficher dans une zone
de liste.
Pas sur d'avoir bien compris ce que tu veux, mais avec...
Un formulaire ayant : - Une zone de texte nommée txtSaisiePays - Une zone de liste nommée ListePays - Un bouton de commande nommé Commande0 - ...
Une table appelée tPays contenant entre autre le nom des pays (NomPays)
alors
Sur l'évènement clic du bouton, tu remplis la zone de liste avec tous les pays dont le nom commence par les caractères saisis dans la zone de texte txtSaisiePays
Private Sub Commande0_Click() Dim strSQL As String strSQL = "Select NomPays from tPays where NomPays like '" & Me! txtSaisiePays & "*' order by NomPays;" Me!ListePays.RowSourceType = "Table/Requête" Me!ListePays.RowSource = strSQL End Sub
C'est ce que tu voulais ?
A+ Eric
"Julien" écrivait news:1da101c46fc1 $240a42c0$:
Bonjour, J'ai un formulaire avec une zone de texte, dans cette zone j'aimerai que la valeur que je rentre me permette d'executer une requete sql,voici un exemple:
je rentre "FR" dans ma zone de texte, ensuite je clique sur un bouton et dans mon code,je dois récuperer "FR" pour le mettre ds ma requete <Select nom_pays from pays where nom_pays="FR*"> puis je voudrai l'afficher dans une zone de liste.
Merci d'avance
Julien
Merci Eric, c'est exactement ce ke je voulais, c vrai ke mon explication n'étai pas des mieu ;-)
@+
-----Message d'origine----- Bonjour,
Pas sur d'avoir bien compris ce que tu veux, mais avec...
Un formulaire ayant : - Une zone de texte nommée txtSaisiePays - Une zone de liste nommée ListePays - Un bouton de commande nommé Commande0 - ...
Une table appelée tPays contenant entre autre le nom des pays (NomPays)
alors
Sur l'évènement clic du bouton, tu remplis la zone de liste avec tous les
pays dont le nom commence par les caractères saisis dans la zone de texte
txtSaisiePays
Private Sub Commande0_Click() Dim strSQL As String strSQL = "Select NomPays from tPays where NomPays like '" & Me!
txtSaisiePays & "*' order by NomPays;" Me!ListePays.RowSourceType = "Table/Requête" Me!ListePays.RowSource = strSQL End Sub
C'est ce que tu voulais ?
A+ Eric
"Julien" écrivait news:1da101c46fc1
$240a42c0$:
Bonjour, J'ai un formulaire avec une zone de texte, dans cette zone
j'aimerai que la valeur que je rentre me permette d'executer une requete sql,voici un exemple:
je rentre "FR" dans ma zone de texte, ensuite je clique sur un bouton et dans mon code,je dois récuperer "FR" pour
le mettre ds ma requete <Select nom_pays from pays where
nom_pays="FR*"> puis je voudrai l'afficher dans une zone
de liste.
Merci d'avance
.
Merci Eric, c'est exactement ce ke je voulais, c vrai ke
mon explication n'étai pas des mieu ;-)
@+
-----Message d'origine-----
Bonjour,
Pas sur d'avoir bien compris ce que tu veux, mais avec...
Un formulaire ayant :
- Une zone de texte nommée txtSaisiePays
- Une zone de liste nommée ListePays
- Un bouton de commande nommé Commande0
- ...
Une table appelée tPays contenant entre autre le nom des
pays (NomPays)
alors
Sur l'évènement clic du bouton, tu remplis la zone de
liste avec tous les
pays dont le nom commence par les caractères saisis dans
la zone de texte
txtSaisiePays
Private Sub Commande0_Click()
Dim strSQL As String
strSQL = "Select NomPays from tPays where NomPays
like '" & Me!
txtSaisiePays & "*' order by NomPays;"
Me!ListePays.RowSourceType = "Table/Requête"
Me!ListePays.RowSource = strSQL
End Sub