Voilà, dans un formulaire j'ia inseré une zone de texte pour y mettre des
infos d'une autre Table ( en quelque sorte un rappel ).
Voici comment je fonctionne : TblClients (Champs NoClient ( Clef Primaire ),
NomClient, Société, Telephone
TblCommandes : Champs NoClient
( Côté plusieurs), DateCommande, RefLicence( Clef Primaire )
TblProduits : RefLicence ( Côté
Plusieurs ), TypeLicence, Superficie, Montant.
Mon but, dans un formulaire appelé FrmClients, est de faire apparaitre dans
une zone de listes, des infos de la Table Commandes ( ex : NoClient,
Telephone etc..)
La requête source de ce form est baséee sur ma Table Clients avec tous les
champs selectionnes.
Dans l'evenement sur Activation, voici mon code :
Private Sub Form_Current()
Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _
" FROM TblCommandes" & _
" WWHERE NoClient = " & Me.IDClient & _
" ORDER BY TblCommandes.RefLicence;"
Me.ListCdes.Requery
End Sub
J'ai compilé ce code et tout est ok ; j'ouvre mon formulaire Client et tout
va bien sauf que mes champs à l'interieur de ma zone de texte sont vides
;-(
J'ai toput reverifié et tout essyayé mais rien à faire ; j'ai bien mes
entêtes de colonne mais rien dedans ; mes champs sont vides de chez vide ! !
!
Je n'ai aucun message d'erreur à l'ouverture du form ni dans ma fenêtre VBA
.
Je me suis donc planté mais je ne sais pas où et je suis bloqué.
Un petit coup de main ou une petite aide me fazrait le plus grand bien ! ! !
!
Merci à celui ou celle qui aura quelques minutes pour me sortir de
l'embarras ;-)
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
Raymond [mvp]
Bonjour.
tu ne peux pas avoir de message d'erreur sur un littéral alpha donc ça passe tout droit et access fait ce qu'il peut avec la syntaxe qu'il a.
Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _ " FROM TblCommandes" & _ " WWHERE NoClient = " & Me.IDClient & _ " ORDER BY TblCommandes.RefLicence;"
WWHERE est-ce une faute de frappe du message ou apparaît-il comme ça dans ton code ? ( Where) NoClient est-il bien numérique ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ayrton [ASC]" a écrit dans le message de news:
Bonjour à tous,
Voilà, dans un formulaire j'ia inseré une zone de texte pour y mettre des infos d'une autre Table ( en quelque sorte un rappel ). Voici comment je fonctionne : TblClients (Champs NoClient ( Clef Primaire ), NomClient, Société, Telephone TblCommandes : Champs NoClient ( Côté plusieurs), DateCommande, RefLicence( Clef Primaire ) TblProduits : RefLicence ( Côté Plusieurs ), TypeLicence, Superficie, Montant.
Mon but, dans un formulaire appelé FrmClients, est de faire apparaitre dans une zone de listes, des infos de la Table Commandes ( ex : NoClient, Telephone etc..) La requête source de ce form est baséee sur ma Table Clients avec tous les champs selectionnes. Dans l'evenement sur Activation, voici mon code :
Private Sub Form_Current() Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _ " FROM TblCommandes" & _ " WWHERE NoClient = " & Me.IDClient & _ " ORDER BY TblCommandes.RefLicence;"
Me.ListCdes.Requery
End Sub
J'ai compilé ce code et tout est ok ; j'ouvre mon formulaire Client et tout va bien sauf que mes champs à l'interieur de ma zone de texte sont vides ;-( J'ai toput reverifié et tout essyayé mais rien à faire ; j'ai bien mes entêtes de colonne mais rien dedans ; mes champs sont vides de chez vide ! ! ! Je n'ai aucun message d'erreur à l'ouverture du form ni dans ma fenêtre VBA . Je me suis donc planté mais je ne sais pas où et je suis bloqué.
Un petit coup de main ou une petite aide me fazrait le plus grand bien ! ! ! ! Merci à celui ou celle qui aura quelques minutes pour me sortir de l'embarras ;-)
tu ne peux pas avoir de message d'erreur sur un littéral alpha donc ça passe
tout droit et access fait ce qu'il peut avec la syntaxe qu'il a.
Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _
" FROM TblCommandes" & _
" WWHERE NoClient = " & Me.IDClient & _
" ORDER BY TblCommandes.RefLicence;"
WWHERE est-ce une faute de frappe du message ou apparaît-il comme ça dans
ton code ? ( Where)
NoClient est-il bien numérique ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ayrton [ASC]" <beco.AS@wanadoo.fr> a écrit dans le message de news:
uGqf6dsDFHA.2804@TK2MSFTNGP14.phx.gbl...
Bonjour à tous,
Voilà, dans un formulaire j'ia inseré une zone de texte pour y mettre des
infos d'une autre Table ( en quelque sorte un rappel ).
Voici comment je fonctionne : TblClients (Champs NoClient ( Clef
Primaire ), NomClient, Société, Telephone
TblCommandes : Champs NoClient
( Côté plusieurs), DateCommande, RefLicence( Clef Primaire )
TblProduits : RefLicence ( Côté
Plusieurs ), TypeLicence, Superficie, Montant.
Mon but, dans un formulaire appelé FrmClients, est de faire apparaitre
dans une zone de listes, des infos de la Table Commandes ( ex : NoClient,
Telephone etc..)
La requête source de ce form est baséee sur ma Table Clients avec tous les
champs selectionnes.
Dans l'evenement sur Activation, voici mon code :
Private Sub Form_Current()
Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _
" FROM TblCommandes" & _
" WWHERE NoClient = " & Me.IDClient & _
" ORDER BY TblCommandes.RefLicence;"
Me.ListCdes.Requery
End Sub
J'ai compilé ce code et tout est ok ; j'ouvre mon formulaire Client et
tout va bien sauf que mes champs à l'interieur de ma zone de texte sont
vides ;-(
J'ai toput reverifié et tout essyayé mais rien à faire ; j'ai bien mes
entêtes de colonne mais rien dedans ; mes champs sont vides de chez vide !
! !
Je n'ai aucun message d'erreur à l'ouverture du form ni dans ma fenêtre
VBA .
Je me suis donc planté mais je ne sais pas où et je suis bloqué.
Un petit coup de main ou une petite aide me fazrait le plus grand bien ! !
! !
Merci à celui ou celle qui aura quelques minutes pour me sortir de
l'embarras ;-)
tu ne peux pas avoir de message d'erreur sur un littéral alpha donc ça passe tout droit et access fait ce qu'il peut avec la syntaxe qu'il a.
Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _ " FROM TblCommandes" & _ " WWHERE NoClient = " & Me.IDClient & _ " ORDER BY TblCommandes.RefLicence;"
WWHERE est-ce une faute de frappe du message ou apparaît-il comme ça dans ton code ? ( Where) NoClient est-il bien numérique ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ayrton [ASC]" a écrit dans le message de news:
Bonjour à tous,
Voilà, dans un formulaire j'ia inseré une zone de texte pour y mettre des infos d'une autre Table ( en quelque sorte un rappel ). Voici comment je fonctionne : TblClients (Champs NoClient ( Clef Primaire ), NomClient, Société, Telephone TblCommandes : Champs NoClient ( Côté plusieurs), DateCommande, RefLicence( Clef Primaire ) TblProduits : RefLicence ( Côté Plusieurs ), TypeLicence, Superficie, Montant.
Mon but, dans un formulaire appelé FrmClients, est de faire apparaitre dans une zone de listes, des infos de la Table Commandes ( ex : NoClient, Telephone etc..) La requête source de ce form est baséee sur ma Table Clients avec tous les champs selectionnes. Dans l'evenement sur Activation, voici mon code :
Private Sub Form_Current() Me.ListCdes.RowSource = "SELECT RefLicence,NoClient As DateCommande " & _ " FROM TblCommandes" & _ " WWHERE NoClient = " & Me.IDClient & _ " ORDER BY TblCommandes.RefLicence;"
Me.ListCdes.Requery
End Sub
J'ai compilé ce code et tout est ok ; j'ouvre mon formulaire Client et tout va bien sauf que mes champs à l'interieur de ma zone de texte sont vides ;-( J'ai toput reverifié et tout essyayé mais rien à faire ; j'ai bien mes entêtes de colonne mais rien dedans ; mes champs sont vides de chez vide ! ! ! Je n'ai aucun message d'erreur à l'ouverture du form ni dans ma fenêtre VBA . Je me suis donc planté mais je ne sais pas où et je suis bloqué.
Un petit coup de main ou une petite aide me fazrait le plus grand bien ! ! ! ! Merci à celui ou celle qui aura quelques minutes pour me sortir de l'embarras ;-)
Bonjour *Raymond [mvp]* qui, ( Dans som message de News: ) Tenait le discours suivant ;-)
Bonjour.
tu ne peux pas avoir de message d'erreur sur un littéral alpha donc ça passe tout droit et access fait ce qu'il peut avec la syntaxe qu'il a.
Je ne sais pas ce qu'est un litteral Alpha ;-(
WWHERE est-ce une faute de frappe du message ou apparaît-il comme ça dans ton code ? ( Where)
Merci 1000 fois Raymond ; tu as l'oeil...................................et le bon ;-) Il s'agissait bien d'une erreur de frappe dans mon code ; il y 2 W ; je vais te faire une confidence même si j'ai honte ;-( Je cherche dpuyis le debut de l'après midi d' où pouvait venir l'erreur er j'ai regardé je ne sais combien de fois mon code pour voir à quel endroit ça clochait et je n'ai rien vu ! ! Il a fallu que tu me le signale pour que j'aille vérifier et j'ia vu errfectivement deux fois le W ; j'ia corrigé et cela a tout de suite fonctionné ; je suis confus !
Bonjour *Raymond [mvp]* qui,
( Dans som message de News:e71pr9sDFHA.1012@TK2MSFTNGP14.phx.gbl ) Tenait
le discours suivant ;-)
Bonjour.
tu ne peux pas avoir de message d'erreur sur un littéral alpha donc
ça passe tout droit et access fait ce qu'il peut avec la syntaxe
qu'il a.
Je ne sais pas ce qu'est un litteral Alpha ;-(
WWHERE est-ce une faute de frappe du message ou apparaît-il comme ça
dans ton code ? ( Where)
Merci 1000 fois Raymond ; tu as l'oeil...................................et
le bon ;-)
Il s'agissait bien d'une erreur de frappe dans mon code ; il y 2 W ; je vais
te faire une confidence même si j'ai honte ;-( Je cherche dpuyis le debut
de l'après midi d' où pouvait venir l'erreur er j'ai regardé je ne sais
combien de fois mon code pour voir à quel endroit ça clochait et je n'ai
rien vu ! ! Il a fallu que tu me le signale pour que j'aille vérifier et
j'ia vu errfectivement deux fois le W ; j'ia corrigé et cela a tout de suite
fonctionné ; je suis confus !
Bonjour *Raymond [mvp]* qui, ( Dans som message de News: ) Tenait le discours suivant ;-)
Bonjour.
tu ne peux pas avoir de message d'erreur sur un littéral alpha donc ça passe tout droit et access fait ce qu'il peut avec la syntaxe qu'il a.
Je ne sais pas ce qu'est un litteral Alpha ;-(
WWHERE est-ce une faute de frappe du message ou apparaît-il comme ça dans ton code ? ( Where)
Merci 1000 fois Raymond ; tu as l'oeil...................................et le bon ;-) Il s'agissait bien d'une erreur de frappe dans mon code ; il y 2 W ; je vais te faire une confidence même si j'ai honte ;-( Je cherche dpuyis le debut de l'après midi d' où pouvait venir l'erreur er j'ai regardé je ne sais combien de fois mon code pour voir à quel endroit ça clochait et je n'ai rien vu ! ! Il a fallu que tu me le signale pour que j'aille vérifier et j'ia vu errfectivement deux fois le W ; j'ia corrigé et cela a tout de suite fonctionné ; je suis confus !
