CALENDRIER
DanMor498
Messages postés
120
Date d'inscription
mardi 28 juin 2005
Statut
Membre
Dernière intervention
7 novembre 2012
-
22 déc. 2007 à 18:10
Adn56 Messages postés 1172 Date d'inscription jeudi 24 mai 2007 Statut Membre Dernière intervention 28 septembre 2013 - 10 août 2010 à 07:46
Adn56 Messages postés 1172 Date d'inscription jeudi 24 mai 2007 Statut Membre Dernière intervention 28 septembre 2013 - 10 août 2010 à 07:46
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/45163-calendrier
https://codes-sources.commentcamarche.net/source/45163-calendrier
10 août 2010 à 07:46
si tu as besoin d'un exemple regarde ma source sur le compte bancaire.
ciao
9 août 2010 à 23:24
10 mars 2009 à 07:23
Et le xml cela avance ?
10 mars 2009 à 04:45
avant ne fonctionnais pas sur le choix des date dans le calendrier
Merci
29 mai 2008 à 23:45
If e.Start = Format(DateString, "long date") Then
lblDate.Text = e.Start.ToLongDateString
lblDate.Text = Format(e.Start, "Long Date")
Else
lblDate.Text = e.End.ToLongDateString
lblDate.Text = Format(e.End, "Long Date")
et placer cette phrase a la place
[ lblDate.Text = Format(e.Start, "Long Date") ]
Sans les crochet
cela devrait fonctionner
29 mai 2008 à 23:28
ainsi le test permettais au programme de voir qu elle date etais choisis
mais si tu vois que cela fonctionne mieux sans le test alors Voila!
Merci...
29 mai 2008 à 18:42
(corriger et cela fonctionne mais je pige pas pourquoi tu l'as écrit XD)
Private Sub MonthCalendar1_DateChanged(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateChanged
'If e.Start = Format(DateString, "long date") Then
lblDate.Text = e.Start.ToLongDateString
'Else
'lblDate.Text = e.End.ToLongDateString
'End If
End Sub
Private Sub MonthCalendar1_DateSelected(ByVal sender As Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateSelected
' If e.Start = Format(DateString, "long date") Then
ListView1.Items.Clear()
TimeHeaderT()
DescriptionHeaderT()
' Else
' ListView1.Items.Clear()
' TimeHeaderT()
' DescriptionHeaderT()
' End If
End Sub
en supprimant tes IF dans ces deux évenements cela tourne nickel ! alors si tu peux m'expliquer pour quoi ces tests sur le formats de la date cela m'aidera à comprendre le binnsssss ^^
+++
PS 7/20 pour le boulot déja réalisé ;)
29 mai 2008 à 06:54
28 mai 2008 à 23:09
Mais je crois quil sagit de la programmation des dates
je revien des que je peut
28 mai 2008 à 18:32
En revanche j'ai aussi cette erreure dés que je change de date sur le calendar : La conversion de la chaîne "05-28-2008" en type 'Date' n'est pas valide.
c'est au format anglo ? peut être cela vient de là ? 28 en mois n'existe pas donc du coup il aime pas ?
Comme en plus j'ai vu des commentaire mi francais/mi anglais je me demande si le soucis ne vient pas du codage de la date ;)
@+ pour du 9
3 févr. 2008 à 09:05
a bientôt
2 févr. 2008 à 15:35
un fois le zip dezipper dans le repertoire projet de vb expresse 2005 il te suffit de demarrer le projet en double cliquand sur le fichier sln et une fois le programme ouvert tu le compile ce qui devrait te donner le projet complet et le fichier exe du programme
si ton vb n est pas vb expresse 2005 ou vb 2005 ca fonctionne pas tu le telecharger gratuitement sur microsoft .com
ou http://www.microsoft.com/express/2005/
voila!
DanMor
2 févr. 2008 à 08:26
je ne suis pas une expere en informatique mais j'ais créer une base de donnée avec access et je possede vissual bassic mais je ne m'en suis jamais servis. je suis tres intereser par ton code source mais le probleme est que une fois telecharger dans un fichier nomer calendrier je ne sait pas se qu'il faut faire ensuite comment et òu l'instaler pour qu'il foncionne
je te remercie par avance pour ton aide
25 déc. 2007 à 18:47
25 déc. 2007 à 18:40
25 déc. 2007 à 15:42
Concernant le xml, c'est un fichier structuré qui fonctionne avec des balises comme le HTML sauf que c'est toi qui décide du nom des balises. Le fichier xml est indépendant d'une BD. Il peut être une "BD"(très basique) en tant que tel.
Je t'invite à lire sur le sujet si tu veux plus d'infos
24 déc. 2007 à 17:50
Merci pour ta réponse si vite retourne
LoadListViewCol1 et LoadListViewCol2 on ete repris et remanipuler sont a voir sa devrait aleger le tout
pour ce qui est du xml j'ai beaucoup de dif a suive le fonctionnement car je sais toujours pas si il faut une base donnees en plus du xml ou seul le xml sufit
ca rentre pas sa doit etre l'age
Il faut savoir que j'ai apris par moi meme donc pas de cours et beaucoup d'erreur et d'embuche dans ma programmation a+
24 déc. 2007 à 14:56
c'est normal qu'une fonction soit typée. Théoriquement une fonction retourne une valeur ce que tu ne fais pas. Dans le cas ou rien n'est retourné une sub fait amplement le travail. Dans ta source, les 2 functions sont en boolean mais elle ne retourne rien alors qu'elle devrait retourner True ou False.
pour le xml, voici une belle occasion de faire la version 2 de ton calendrier et de t'attarder au xml puisque le restant fonctionne bien.
Pour encoder en dure tu peux contourner le probleme en utilisant my.application.infos.???path (j'ai oublié le mot exact) ainsi peu importe le repertoire d'installation de l'application les fichiers seront dans le meme sous repertoires que ton application.
22 déc. 2007 à 23:25
et encore des difficulter a travailler avec les base de données puisque qu'on me dit que fait tout a la dure et pas
asse automatiser
22 déc. 2007 à 23:23
d ajouter ca a la fin ca fonctione pas essais en sub si tu veut
parce que c'est une ebauche parfois je vais au plus rapide
22 déc. 2007 à 23:02
c'est bien comme source mais il y a 2 points que je ne comprends pas trop trop.
1- Pourquoi est-ce que les functions LoadListViewCol1 et LoadListViewCol2 sont déclarées en boolean alors qu'elle ne retourne rien ?
2- Pourquoi stocker les infos dans la base de registres alors qu'un fichier xml ou une bd access aurait fait l'affaire ?
22 déc. 2007 à 19:19
22 déc. 2007 à 19:01
If e.Start = Format(e.Start, "long date") Then
22 déc. 2007 à 18:45
e.Start.ToLongDateString
il te faut peut etre la remplacer par
format(e.start,"long date") et si sa marche ou pas dis le moi que je fasse d autre recherche
@+
22 déc. 2007 à 18:38
22 déc. 2007 à 18:29
22 déc. 2007 à 18:10
Sur outlook C'est pas une grosse affaire mais c'est un debut...