PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 2024 → nom des mois entre deux dates
nom des mois entre deux dates
Iniciado por saber knani, jan., 23 2018 9:39 PM - 7 respostas
#1
Publicado em janeiro, 23 2018 - 9:39 PM
salut à tous,

ya t-il une solution pour afficher les nom des mois entre deux dates données exemple extraire les nom des mois et des jours dans chaque mois entre 3/3/2018 et 20/7/2018? 9a me parait très dificile :-(
#2
Membro registado
948 mensagems
Popularité : +30 (92 votes)
Publicado em janeiro, 23 2018 - 9:41 PM
Coucou,

Tu as essayer d'utiliser DateVersChaine ?
Reference: http://doc.pcsoft.fr/?3027025

--
In üs we trust.
Autopsie Volume 1 disponible au dépot de ton armurier: http://www.sitealademande.com/sitealamande/anywhere/depot
#3
Membro registado
2.568 mensagems
Popularité : +222 (260 votes)
Publicado em janeiro, 24 2018 - 5:34 AM
Bonjour,

Voilà de quoi afficher les mois en lettres. Par contre je n'ai pas compris ce que tu voulais faire avec les noms des jours
dDate1 est Date = "20180303"
dDate2 est Date = "20180720"

//Affichage des mois
POUR i = dDate1..Mois _À_ dDate2..Mois
Trace(DateVersMoisEnLettre("2018"+NumériqueVersChaîne(i,"02d")+"01"))
FIN


--
Cordialement,

Philippe SAINT-BERTIN
Géode Informatique
#4
Membro registado
834 mensagems
Popularité : +13 (13 votes)
Publicado em janeiro, 24 2018 - 9:13 AM
Tu as le jour et le mois :
dDate_deb est Date = "20180303"
dDate_fin est Date = "20180720"
dDate_tmp est une Date = dDate_deb

TANTQUE dDate_tmp <= dDate_fin
Trace(DateVersChaîne(dDate_tmp,"JJJ jj MMMM aaaa"))
dDate_tmp..Jour += 1
FIN


J.Michel

--
Synchronize Systems International LTD
Développement d'outils de gestion

Environnements AS400 – Windows
Langages GAP III – CL – Visual Basic - Visual Adélia - Adélia - Windev
http://www.cashpower.fr/

Bangkok / Pattaya
#5
Publicado em janeiro, 24 2018 - 3:43 PM
merci pour votre aide je m'explique par exemple entre les deux dates 22/01/2017 et 12/3/2017 le résultat est:
janvier: 22 jours
fevrier: 28 (ou 29 )jours selon type d'année
mars: 12 jours
voila d'une autre façon extraire la durée entre deux dates mais en détails avec nom du mois et nonbre des jours dans chaque mois.
#6
Publicado em janeiro, 24 2018 - 3:55 PM
merci à tous pour vos aides, je m'explique: exemple entre les deux dates 12/1/2017 et 22/03/2017 le résultat est comme ceci:
janvier: 19 jours (31-12)
fevrier: 28 ou 29 jours (suivant type d'année)
mars: 22 jours

d"une autre façon calculer la durée et donner les détails suivant nom du mois et nb jours dans chaque mois.
#7
Membro registado
2.568 mensagems
Popularité : +222 (260 votes)
Publicado em janeiro, 24 2018 - 4:16 PM
Bonjour

tu peux faire comme ceci. Ensuite à toi de vor si tu comptes le premier jour ou non
taMois est tableau associatif d'entiers

dDate1 est Date = "20170112"
dDate2 est Date = "20170312"

TANTQUE dDate1 <= dDate2
taMois[DateVersMoisEnLettre(dDate1)]++

dDate1..Jour++
FIN

POUR TOUT nValeur,sCle de taMois
Trace(sCle+" : "+nValeur+" jour(s)")
FIN


--
Cordialement,

Philippe SAINT-BERTIN
Géode Informatique
#8
Publicado em janeiro, 24 2018 - 7:01 PM
Merci beaucoup c'est tres précis votre code et bonne soirée :merci:
→ Voltar para WINDEV 2024