Prog1001
Messages postés56Date d'inscriptionmercredi 5 mai 2004StatutMembreDernière intervention22 septembre 2009 16 sept. 2011 à 14:53
blq, j'ai testé sous W7 64bits et je ne rencontre pas ton problème.
Prog1001
Messages postés56Date d'inscriptionmercredi 5 mai 2004StatutMembreDernière intervention22 septembre 2009 14 sept. 2011 à 11:01
J'ai vu le principe. je m'en inspirerai peut-être. Merci
Shaegal
Messages postés110Date d'inscriptionvendredi 1 février 2008StatutMembreDernière intervention12 mai 20211 14 sept. 2011 à 10:37
Ha oui, désolé. Lol.
J'ai bêtement répondu à TA source. Quelle buse je fais!
Je décoche "Être averti..." et c'est bon.
Sinon, as-tu essayer la dll?
Encore désolé...... ;-)
Prog1001
Messages postés56Date d'inscriptionmercredi 5 mai 2004StatutMembreDernière intervention22 septembre 2009 14 sept. 2011 à 10:28
Non, là tu es sur CALENDRIER ANNUEL NORME ISO et pas DATES FETES FIXES MOBILES
:)
Shaegal
Messages postés110Date d'inscriptionvendredi 1 février 2008StatutMembreDernière intervention12 mai 20211 14 sept. 2011 à 09:53
Comment ça je me suis trompé de source?
C'est bien la dll qui permet de calculer la date de Pâques en fonction de l'année saisie. A partir de cette date, on peut calculer toutes les autres dates de fêtes mobiles.
Prog1001
Messages postés56Date d'inscriptionmercredi 5 mai 2004StatutMembreDernière intervention22 septembre 2009 14 sept. 2011 à 09:20
Tu t'es trompé de source Shaegal.
Shaegal
Messages postés110Date d'inscriptionvendredi 1 février 2008StatutMembreDernière intervention12 mai 20211 14 sept. 2011 à 09:17
Salut JAJACOM1965,
Merci pour ton commentaire, qui n'est pas l'avis de tout le monde, et c'est tant mieux. C'est comme ça qu'on avance.
Bref! En fait, j'ai récemment ajouté une fonction qui retourne directement le nom du jour férié s'il la date fournit en est une.
Elle se trouve dans CalcPâques.DatesFêtes et se nomme justement Férié(<Dates>)
Si la date est un jour férié, elle retourne le nom, sinon, une chaîne vide.
C'est cette fonction qui sera le plus fréquemment utilisée.
Maintenant, que veux-tu dire par "jours fériés présélectionnés"?
PS: comme me l'a fait remarquer à juste titre NHENRY, il y a une petite erreur de code, sans gravité. Il faut remplacer a ligne "LundiPâques DateAdd(DateInterval.Day, 1, Pâques)" par "LundiPâques DateAdd(DateInterval.Day, 1, Pâques(Année))".
jajacom1965
Messages postés1Date d'inscriptionjeudi 20 mai 2010StatutMembreDernière intervention13 septembre 2011 13 sept. 2011 à 23:58
Superbe travail. Il manque à mon sens les jours fériés présélectionnés.
Shaegal
Messages postés110Date d'inscriptionvendredi 1 février 2008StatutMembreDernière intervention12 mai 20211 12 sept. 2011 à 13:41
Voici le lien pour calculer les dates des fêtes fixes et mobiles.
En outre, elle te donne le n° de la semaine légale, si l'année est bissextile et si la date est un week-end...
Prog1001
Messages postés56Date d'inscriptionmercredi 5 mai 2004StatutMembreDernière intervention22 septembre 2009 12 sept. 2011 à 10:26
Bonjour
Pour la sauvegarde dans un fichier : il suffit de sérialiser les variables : Flags, A.Flags et l'année dans un fichier. Je le ferai à l’occasion.
J'ai pas testé sous Windows 64bits ni sous sous VB Express. Ton problème est étonnant.
Les jours fériés dans la DGV sont la somme des jours marqués avec un drapeau samedi, dimanche ou fériés. Par défaut au lancement du programme, seul les dimanches son marqués : c'est pourquoi ça correspond au nombre de semaine. Essais d'appliquer le drapeau férié sur d'autre date et tu verras que la valeur de la colonne "Jours fériés" change.
je veux bien le code qui permet de calculer les dates des jours fériés en automatique.
Shaegal
Messages postés110Date d'inscriptionvendredi 1 février 2008StatutMembreDernière intervention12 mai 20211 12 sept. 2011 à 09:44
Salut Prog1001
Une toute petite erreur: dans ton DGV, je pense qu'il faut remplacer "Jours fériers" par "Nombre de semaines" que comporte le mois.
Par contre, si ça t'intéresse, j'ai créé une petite dll qui calcul, entre autre, les dates des fêtes fixes et mobiles. Ton programme pourrai s'en servir pour les prédéterminer.
blq
Messages postés97Date d'inscriptionvendredi 22 octobre 1999StatutMembreDernière intervention13 juin 20161 9 sept. 2011 à 22:26
Testé sous VB Express 2010 et W7 64bits : je ne peux pas sélectionner les jours, du moins les boutons options n'apparaissent pas comme dans la copie d'écran.
Je n'ai pas cherché beaucoup... Mais il y a un dysfonctionnement quelque part. Car après ouvert le fichier Semaine.vb [Design], j'ai eu une erreur dans Semaine.Designer.vb sur la ligne Me.S = New Calendrier.DataGridViewNotSelection() Ce qui n'est pas normal. Bref, soit il y a un truc qui ne va pas dans mon install de VB Express (une ressource manquante disponible uniquement dans les éditions non Express), soit j'ai loupé un truc... Mais je n'ai fait qu'ouvrir le fichier .sln
A noter qu'à la première ouverture, l'exécution n'a posé aucun souci, sauf que les jours ne pouvaient être sélectionnés.
En tout cas, l'affichage du calendrier est sympa !
veloce35
Messages postés27Date d'inscriptionjeudi 2 octobre 2003StatutMembreDernière intervention18 avril 2010 9 sept. 2011 à 18:26
Re, OK ça fonctionne, dommage qu'il n'y a pas de sauvegarde de manière à récupérer les saisies.
Prog1001
Messages postés56Date d'inscriptionmercredi 5 mai 2004StatutMembreDernière intervention22 septembre 2009 9 sept. 2011 à 14:00
Bonjour
Merci pour ce commentaire encourageant et pour la remarque du bug ; celui-ci se corrige en ajoutant :
ListViewFlags.Items(0).Selected = True
dans : Calendrier_Load
Après l'insertion des iTems dans la listview.
(= Avant la ligne A.RA())
veloce35
Messages postés27Date d'inscriptionjeudi 2 octobre 2003StatutMembreDernière intervention18 avril 2010 9 sept. 2011 à 13:50
Bonjour Prog1001, pas mal ton calendrier étant novice en vb.net( je commence à m'y intéresser, je suis toujours à VB6).
j'ai pu constater un bug si je clic sur optionButton sans cocher un checkBox sur le calendrier et que j'applique.
16 sept. 2011 à 14:53
14 sept. 2011 à 11:01
14 sept. 2011 à 10:37
J'ai bêtement répondu à TA source. Quelle buse je fais!
Je décoche "Être averti..." et c'est bon.
Sinon, as-tu essayer la dll?
Encore désolé...... ;-)
14 sept. 2011 à 10:28
:)
14 sept. 2011 à 09:53
C'est bien la dll qui permet de calculer la date de Pâques en fonction de l'année saisie. A partir de cette date, on peut calculer toutes les autres dates de fêtes mobiles.
14 sept. 2011 à 09:20
14 sept. 2011 à 09:17
Merci pour ton commentaire, qui n'est pas l'avis de tout le monde, et c'est tant mieux. C'est comme ça qu'on avance.
Bref! En fait, j'ai récemment ajouté une fonction qui retourne directement le nom du jour férié s'il la date fournit en est une.
Elle se trouve dans CalcPâques.DatesFêtes et se nomme justement Férié(<Dates>)
Si la date est un jour férié, elle retourne le nom, sinon, une chaîne vide.
C'est cette fonction qui sera le plus fréquemment utilisée.
Maintenant, que veux-tu dire par "jours fériés présélectionnés"?
PS: comme me l'a fait remarquer à juste titre NHENRY, il y a une petite erreur de code, sans gravité. Il faut remplacer a ligne "LundiPâques DateAdd(DateInterval.Day, 1, Pâques)" par "LundiPâques DateAdd(DateInterval.Day, 1, Pâques(Année))".
13 sept. 2011 à 23:58
12 sept. 2011 à 13:41
En outre, elle te donne le n° de la semaine légale, si l'année est bissextile et si la date est un week-end...
http://www.vbfrance.com/codes/DATES-FETES-FIXES-MOBILES_53581.aspx
12 sept. 2011 à 10:26
Pour la sauvegarde dans un fichier : il suffit de sérialiser les variables : Flags, A.Flags et l'année dans un fichier. Je le ferai à l’occasion.
J'ai pas testé sous Windows 64bits ni sous sous VB Express. Ton problème est étonnant.
Les jours fériés dans la DGV sont la somme des jours marqués avec un drapeau samedi, dimanche ou fériés. Par défaut au lancement du programme, seul les dimanches son marqués : c'est pourquoi ça correspond au nombre de semaine. Essais d'appliquer le drapeau férié sur d'autre date et tu verras que la valeur de la colonne "Jours fériés" change.
je veux bien le code qui permet de calculer les dates des jours fériés en automatique.
12 sept. 2011 à 09:44
Une toute petite erreur: dans ton DGV, je pense qu'il faut remplacer "Jours fériers" par "Nombre de semaines" que comporte le mois.
Par contre, si ça t'intéresse, j'ai créé une petite dll qui calcul, entre autre, les dates des fêtes fixes et mobiles. Ton programme pourrai s'en servir pour les prédéterminer.
9 sept. 2011 à 22:26
Je n'ai pas cherché beaucoup... Mais il y a un dysfonctionnement quelque part. Car après ouvert le fichier Semaine.vb [Design], j'ai eu une erreur dans Semaine.Designer.vb sur la ligne Me.S = New Calendrier.DataGridViewNotSelection() Ce qui n'est pas normal. Bref, soit il y a un truc qui ne va pas dans mon install de VB Express (une ressource manquante disponible uniquement dans les éditions non Express), soit j'ai loupé un truc... Mais je n'ai fait qu'ouvrir le fichier .sln
A noter qu'à la première ouverture, l'exécution n'a posé aucun souci, sauf que les jours ne pouvaient être sélectionnés.
En tout cas, l'affichage du calendrier est sympa !
9 sept. 2011 à 18:26
9 sept. 2011 à 14:00
Merci pour ce commentaire encourageant et pour la remarque du bug ; celui-ci se corrige en ajoutant :
ListViewFlags.Items(0).Selected = True
dans : Calendrier_Load
Après l'insertion des iTems dans la listview.
(= Avant la ligne A.RA())
9 sept. 2011 à 13:50
j'ai pu constater un bug si je clic sur optionButton sans cocher un checkBox sur le calendrier et que j'applique.
Cordialement