diombo
Messages postés1Date d'inscriptionjeudi 11 mars 2004StatutMembreDernière intervention 3 juin 2005
-
3 juin 2005 à 15:10
cs_drahcir
Messages postés745Date d'inscriptionmardi 30 novembre 2004StatutMembreDernière intervention15 septembre 2009
-
3 juin 2005 à 15:46
Jai un data environnement nommé de_feuille
Et une commande associée à ce data environnement nommé cmd_feuillevente.
A cette commande on associe une requete sql parametrée qui est la suivante :
SELECT feuillevente.refprod, produits.nomproduit, feuillevente.qt, feuillevente.pu, feuillevente.mtvente, feuillevente.datevente FROM feuillevente, produits WHERE feuillevente.refprod <gras>produits.refprod AND (feuillevente.datevente ?)</gras>
Je veux quau chargement de létat quil est une boite de dialogue qui demande à lutilisateur dentrer la date afin que létat naffiche que les produits vendus à la date saisie.
Pour cela, on utilise le code suivant :
Private Sub DataEnvironment_Initialize()
de_feuille.cmd_feuillevente (InputBox("Entrer la Date du Jour"))
End Sub
Le programme marche bien quand je clique sur le bouton approprié (eta_feuillevente.Show)
Ma difficulté est la suivante :
Quand je ferme létat, et que je clique de nouveau sur le bouton approprié, létat souvre sans la boîte de dialogue et me donne les produits vendus à la date précédemment saisie.