Discussion :

[riesseg]

J'ai une appli qui tourne 24h/24

j'aimerai faire une sauvegarde automatique tous les lundi par exemples.
J'aimerai savoir ou dans le code, je peux faire la verification de la date...

J'ai un mdiMain, dans lequel s'ouvre toutes les autres frm de mon appli.
dans ce mdiMain, j'ai un statusBar
Dans ce statusBar, j'ai l'heure qui s'affiche...
Je peux retrouver le code de l'heure qque part ??
Etant donne que c'est un raffraichissement direct avec l'heure systeme, ca serai cool...

Mais je sais pas si elle existe :'(

[jmfmarques]

Il te faudra nécessairement un timer ou une boucle en tenant lieu (avec la fonction timer) ainsi qu'une variable globale pour éviter plusieurs fois l'opération aux changements de date (variable contenant, par exemple, la dernière date de lancement de cette opération)

[riesseg]

bon, disont que j'ai trouver dans mon code, dans mon mdiMain, un endroit qui s'actualise toutes les 500ms apparament tout le temps (je pense en tout cas).

disont que c'est ici que je vais mettre ma fonction qui fait ma sauvegarde, comment cela devrai se derouler ?

100*3600*7 = 1semaine en ms si je ne m'abuse100*3600*7
je creer un timer tmrSauv:
Avec un delai de 100*3600*7 ms ? (je sais psa pourquoi, ca me parait zarb comme truc...)

ou plutot

Je fais un If tmrTourneToutLeTemps Mod(100*3600*7) = 0 Then Sauf EndIf ?

[riesseg]

j'ai un peu reflechis sur le probleme, et en pansant a l'heure systeme, me suis dit qu'il y'avais une bien une fonction vb6 qui arrive a savoir la date .


pis oui !

donc je pense que je peux faire achement plus simple que de jouer avec les timers.

Je prend une variable global de type Date(?)
Je fais ma fenetre de saisie de jour et heure de date de Sauvegarde. [genre vendredi 00:00 ]
Et la, bin je crois que je seche...
je recupere la date courante, comment de la trouver la date du prochain vendredi ??
methode: il faut que je recupere le jour de la semaine aujourd'hui et que je fasse + Xjours
Quel Fonction utiliser ??

Apres, en fonction de ce nombre de differnce de jour, ca devient facile.
DateProchaineSauvegarde = Date Courante + X jours
Et quand je sauve:
DateProchaineSauvegarde = Date Courante + 7 jours

[riesseg]

je fais des recherches, et je sais qu'il existe une fonction vb6 qui peut me dire si aujourd'hui on est lundi, mardi...

Mais j'arrive pas a trouver un exemple concret...
et F1 ne marchant pas, je bloque un peu...

Solution pensée:
Je regarde quel jour on est.
si on est vendredi (cf exemple)je regarde l'heure.
si il est minuit, je sauvegarde.

Question:
Quel fonction vb6 peut me retourner le jour de la semaine ?

[riesseg]

WeekdayName, fonction


Description

Renvoie une chaîne indiquant le jour de la semaine spécifié.

Syntaxe

WeekdayName(weekday, abbreviate, firstdayofweek)

La syntaxe de la fonction WeekdayName comprend les éléments suivants :

Élément Description
weekday Désignation numérique du jour de la semaine. La valeur numérique du jour de la semaine dépend de la valeur de l'argument firstdayofweek.
abbreviate Facultatif. Valeur booléenne indiquant si le nom du jour de semaine doit être abrégé. Si cette valeur est omise, la valeur par défaut est False, ce qui signifie que le nom du jour n'est pas abrégé.
firstdayofweek Facultatif. Valeur numérique indiquant le premier jour de la semaine.


Valeurs

L'argument firstdayofweek prend les valeurs suivantes :

Constante Valeur Description
vbUseSystem 0 Utiliser la valeur API NLS de la langue nationale.
vbSunday 1 Dimanche (défaut)
vbMonday 2 Lundi
vbTuesday 3 Mardi
vbWednesday 4 Mercredi
vbThursday 5 Jeudi
vbFriday 6 Vendredi
vbSaturday 7 Samedi

ou


Private Sub Command1_Click()
MsgBox Format(Now, "mmmm")
MsgBox Format(Now, "dddd")
MsgBox Format(Now, "yyyy")
End Sub