[..]Renseigner une table access en fonction de la date du Jour.
Posté : ven. 01 juin 2018 11:00
Bonjour a tous,
Voila j'ai commencer a travailé sur un bout de code afin de renseigner une table en fonctione de la date du jour.
je m'explique
si la date du jour est inferieur au 06/mm/aaaa je veut qui mette le dernier jour du mois precedent dans $query = "Update DatesParamètres set Dimanche = format(date()-1,'yyyymmdd')"
sinon il execute mon code $query = "Update DatesParamètres set Dimanche = format(date()-1,'yyyymmdd')"
voici le code que j'ai cree.
Pouvez vous m'aidé
Voila j'ai commencer a travailé sur un bout de code afin de renseigner une table en fonctione de la date du jour.
je m'explique
si la date du jour est inferieur au 06/mm/aaaa je veut qui mette le dernier jour du mois precedent dans $query = "Update DatesParamètres set Dimanche = format(date()-1,'yyyymmdd')"
sinon il execute mon code $query = "Update DatesParamètres set Dimanche = format(date()-1,'yyyymmdd')"
voici le code que j'ai cree.
Code : Tout sélectionner
#include <Date.au3>
$_dbname = "H:\Processus\Belgique\hebdo\statistiques\3 - Statecri_Belge - Daniel.mdb"
$tblname = "DatesParamètres"
if _NowDate() <= "yyyy/mm/06" Then
;Update DatesParamètres set Lundi = format(date()-7,"yyyymmdd")
$query = "Update DatesParamètres set Lundi = format(date()-7,'yyyymmdd')"
$adoCon = ObjCreate("ADODB.Connection")
$adoCon.Open("Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & $_dbname)
$adoCon.Execute($query)
$query = "Update DatesParamètres set Dimanche = format(date()-1,'yyyymmdd')"
$adoCon = ObjCreate("ADODB.Connection")
$adoCon.Open("Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & $_dbname)
$adoCon.Execute($query)
$adoCon.Close
Else
EndIf