Discussion :

[missastro]

Bonjour,

J'ai au niveau de mon formulaire access une zone de texte qui contient l'écart entre deux date (la date système au moment de l'enregistremen et la date de la commande), je voudrais savoir comment faire pour incrémenter cette écart au fur et à mesur de lécoulement des jours sachant que cette écart doit toujours mentionné la date système-date commande.

Voilà le 1er code que g fait

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim nb_jour As Integer
nb_jour = (Date - Forms![Traitement]![Date_cmd]) + 1
Forms![Traitement]![Ecart] = nb_jour

Bonne soirée

[Lehobbit78]

Salut, regarde du côté de ce tuto http://mhubiche.developpez.com/vba/f...ions/datetime/ sur les dates. La fonction DateDiff peut notamment t'être utile. De mémoire il y a aussi un exemple d'utilisation de cette fonction dans la FAQ.
Bon courage

[missastro]

Bonjour!

Alors pour que l'écart s'actualise au cours des jours j'ai mis au niveau de la table "commande" valeur par défaut de "Ecart"est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DateDiff("d",Date(),Date_cmd")

Mais ça me sort un message d'erreur comme quoi il ne reconnait pas Date_cmd

Que faire?

[Lehobbit78]

c'est normal tu as des guillemets en trop avant la parenthèse !!

De plus as-tu réellement besoin de stocker "ecart" dans ta table commande car c'est un peu redondant à mon sens. En effet tu peux obtenir l'écart en le calculant à chaque fois que tu en as besoin en récupérant la date_cmd dans ta table.

[missastro]

nn nn désolée c t juste une erreur de frappe, je né pas de parenthèse en plus. Et il me faut absolument l'écart au niveau de la table pour maintenir les états de retard de livraison à jour.

[Bragon12]

Et pourquoi tu ne ferrais pas tes états de retard à partir d'une requête plutôt qu'à partir de ta table? Comme ca tu calcules directement ton écart dans ta requête et tu n'as plus besoin de la donnée dans ta table.

[missastro]

et j'insère DateDiff()dans la requete SQL!!!?

[Bragon12]

Perso j'ai essayé un code tu type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT Cdate(Date())-[table]![date_origine] AS Retard FROM Table WHERE [table]![date_origine]<>0

Ca fonctionne chez moi!

[missastro]

Re!

Voilà, là j'ai modifier la requete qui me donne les commandes en retard comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT *,Cdate(Date())-Date_cmd AS Ecart 
FROM Commande
WHERE Mode_transport="Avion" AND Ecart>10;

Mais il ne reconnais pas Ecart!!

[Bragon12]

Réécris ta formule plutôt que le nom dans ta condition, ca devrait marcher:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT *,Cdate(Date())-Date_cmd AS Ecart 
FROM Commande
WHERE Mode_transport="Avion" AND (Cdate(Date())-Date_cmd )>10;

[missastro]

On m'affiche un msg:

"Type de données incompatible dans l'expression du critère"

[missastro]

En fait, la fonction Cdate() elle retourne quel type?

[Bragon12]

CDate c'est "Conversion en Date", donc elle retrourne une date.
Mais normalement une soustraction de dateqs doit donner un entier (mais je peux me tromper) sinon, tu peux toujorus encadrer ta fonction par un Cent() pour convertir en entier.
Ce que tu peux aussi faire, c'est executer ta requête sans le critère pour voir ce qu'elle renvoie au champ Ecart.

[missastro]

Cent n'a pas marcher!

Aussi g supprimer le 2ème critère et ça maffiche tjr le msq derreur!

[missastro]

Coucou! C'est non

J'ai réussie à déblocker le problème: au niveau du mode de transport, le champ puisé ses valeurs dans une autre table et il fallait mettre une jointure!!!!

voici le code correcte

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT DATEDIFF("d",Date_cmd,Date()) AS Ecart, *
FROM Commande, Mode_transport
WHERE Commande.Mode_transport=Mode_transport.ID AND Mode_transport.ID=3 AND DATEDIFF("d",Date_cmd,Date())>10;

J'éspère que ça vous sera d'une certaine utilité.

Bonne soirée
et Merci à tous