PROFESSIONAL NEWSGROUPS
WINDEV
,
WEBDEV
and
WINDEV Mobile
Home
|
Recent messages
|
Connect
|
Sign out
|
English
Home
→
WINDEV 2024
→
dernier jour du mois automatique
dernier jour du mois automatique
Started by yves, Sep., 21 2004 5:48 PM - 5 replies
Connect yourself…
yves
#1
Posted on September, 21 2004 - 5:48 PM
y a-t-il une astuce pour proposer automatiquement le dernier jour du mois ?
Merci.
yves
Report
0
0
pasdespam_info
#2
Posted on September, 21 2004 - 3:04 PM
PC Soft a été une fois de plus brillant pour celle-ci en WD8.
On ne peut plus simple.... une vraie merveille!
DteFinMois est une date // par défaut = DateSys()
DteFinMois..Jour1 // donne automatiquement le dernier jour du mois
Réal (Phil)
Report
0
0
noel.kevin
#3
Posted on September, 21 2004 - 5:55 PM
"Yves T" <yves@ncmedia.ch> wrote in news:415030db@news.pcsoft.fr:
y a-t-il une astuce pour proposer automatiquement le dernier jour du
mois ?
Merci.
yves
d est une Date = DateSys
d..Mois++ //Mois prochain
d..Jour = 1 //1er jour du mois prochain
d..Jour-- //Dernier jour de ce mois
Info("Le dernier jour de ce mois est : " + d..Jour)
A+
PS: Il y a p-e plus simple, mais je fais ça rapidement.
--
N. Kevin
Report
0
0
fcsamplus
#4
Posted on September, 21 2004 - 6:08 PM
Bonjour,
Le support a traité ce problème comme suis dans le rubrique 'La saviez vous'.
Je pense que c'est ta solution.
pcsoft.fr.windev
[Re: [16/09/2004] Le Saviez-Vous ?]
"Le Support Technique Gratuit" <supportgratuit@pcsoft.fr> a écrit dans le
message de news:4149b556@news.pcsoft.fr...
Bonjour,
Les propriétés "Jour", "Mois" et "Année" utilisées avec les opérateurs ++
, -- , += et -= permettent de réaliser très simplement des calculs sur
les dates en prenant en compte du nombre de jours par mois et les années
bissextiles.
Exemple : pour obtenir le nombre de jours du mois de février quelque soit
l'année
MaDate est une Date = "20030201" // année 2003, mois de février
MaDate..Jour = 31 // dernier jour du mois
Trace(MaDate..Jour) // retourne 28
MaDate..Année++ // année suivante
MaDate..Jour = 31 // dernier jour du mois
Trace(MaDate..Jour) // retourne 29
Autre exemple : calculer la fin d'un mois flottant
DateDébut est une date = "20011025"
DateFin est une date = DateDébut
DateFin..Mois++ // mois suivant
DateFin..Jour-- // jour précédent
Trace(DateFin) // retourne 20011124
---
Cordialement,
Le Support Technique Gratuit
BonDev
Report
0
0
noel.kevin
#5
Posted on September, 21 2004 - 6:18 PM
"Kevin N." <noel.kevin@skynet.be> wrote in
news:Xns956BA2339BDEAnoelkevinskynetbe@81.80.226.155:
"Yves T" <yves@ncmedia.ch> wrote in news:415030db@news.pcsoft.fr:
y a-t-il une astuce pour proposer automatiquement le dernier jour du
mois ?
Merci.
yves
d est une Date = DateSys
d..Mois++ //Mois prochain
d..Jour = 1 //1er jour du mois prochain
d..Jour-- //Dernier jour de ce mois
Info("Le dernier jour de ce mois est : " + d..Jour)
A+
PS: Il y a p-e plus simple, mais je fais ça rapidement.
d est une Date = DateSys
d..Jour = 31
Info("Le dernier jour de ce mois est : " + d..Jour)
Voilà encore plus court...
--
N. Kevin
Report
0
0
philip.lallement
#6
Posted on September, 21 2004 - 6:25 PM
faire -1 jour sur le AAAAMMJJ
Message(EntierVersDate(DateVersEntier(Gauche(DateSys(),6)+"01")-1))
Salutations
Report
0
0
→ Go back to WINDEV 2024
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (earlier versions)
WINDEV 26
WINDEV 2024
WINDEV 2024
WINDEV 2024
WINDEV 25
WEBDEV 2024
WEBDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV Mobile 2024
WINDEV (earlier versions)
WINDEV (earlier versions)
WEBDEV (earlier versions)
WEBDEV (earlier versions)
WINDEV Mobile (earlier versions)
WINDEV Mobile (earlier versions)
Reports & Queries
Reports & Queries
Off-topic
Off-topic
Tools
Tools
Français
English
Español
Portuguesa
Close this window
Search type
Only topics
All the messages
Search period
Any time
Past hour
Past 24 hours
Past week
Past month
Past year
Cancel
Preview of your message
Adding an image
Import an image from a URL
Send an image from a file of your disk
Drop a file or click "Browse..."
or
Cancel
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Text