KIBEYA
Messages postés10Date d'inscriptionvendredi 15 octobre 2004StatutMembreDernière intervention 6 janvier 2005
-
5 janv. 2005 à 14:39
madbob
Messages postés285Date d'inscriptiondimanche 14 décembre 2003StatutMembreDernière intervention13 mars 2012
-
12 janv. 2005 à 13:45
Une zone de contrôle placée sur un formulaire d'Access 2000 et dont la source de données est une fonction me retourne la valeur "#Erreur" à l'ouverture du dit formulaire avant même que le focus l'atteigne. Mais après toute opération le résultat affiché dans cette zone de contrôle est correct. Que faire pour ne plus avoir "#Erreur" dans cette zone?
KIBEYA
Messages postés10Date d'inscriptionvendredi 15 octobre 2004StatutMembreDernière intervention 6 janvier 2005 6 janv. 2005 à 12:13
madbob
Merci de vouloir bien concourir à mon problème. Merci des votre contribution.
Je vais essayer les astuces dont vous me faites et je vous ferez la suite.
Mais quelque part j'avais déjà essayé d'initialiser mes variables mais en vain le
contrôle n'acceptait pas de valeur initiale parcequ'il était déjà lié à une fonction
qui doit nécessairement retourner une valeur.
Supposons que dans un formulaire vous devez entrer une date de livraison et
que vous ayez prévu une autre zone de contrôle du format date qui doit calculer
la date de l'échéance par la fonction ci-après : =AjDate("a";(+7);[Datelivraison]
insérée dans la propriété "Donnée" / "Source de Contrôle" .
Je vous ferez la suite par après.
Encore une fois merci
Vous n’avez pas trouvé la réponse que vous recherchez ?
madbob
Messages postés285Date d'inscriptiondimanche 14 décembre 2003StatutMembreDernière intervention13 mars 2012 12 janv. 2005 à 13:45
J'ai trouvé ta solution !!!
Tu mets 0 en default value à ton champ [Datelivraison]
via les propriétés des controles pour que la valeur soit prise au
moment du chargement du formulaire qui appellera la fonction de calcul
de date de livraison.
Ensuite tu modifies ta fonction qui testera la valeur corecetement [Datelivraison] (en parametre ici P_date)
dim Mavar as variant
Mavar = ""
'* initialisation du formulaire
if P_date = 0 then
msgbox "init"
'* calcul de la période
else
mavar = P_date + 7
Endif
'* retourne la valeur
AjDate = Mavar
Je ne pense pas que tu ais d'autre choix pour le gruger
au vu de la méthode que tu utilise pour mettre à jour ton champ date de
livraison...