Skip navigation.

digital-nation

Blog-note d'un informaticien procrastinate...

Posts tagged with "mois"

Date et BATCH

Sunday, 22. November 2009, 09:38:16

, , , ...

Parfois je me dis que c’est mal fait. Alors on recommence. C’est un peu ce que j’ai fait avec un script permettant de faire un tracking de connexion mais en mode MS-DOS.

Créer le script ne fut pas difficile en soit… Une ligne et le tour est joué. Non. La particularité fut de travailler avec les dates.
La date est stockée dans la variable %DATE%. Selon que le système aie les paramètres régionaux Français (France), Français (Belgique), Néerlandais (Belgique) – qui sont les paramètres les plus utilisé en Belgique – le renvoi de la valeur lorsqu’on fait un ECHO de la variable DATE change !
  • Vr. 20/11/2009
  • Ven. 20/11/2009
  • 20/11/2009

Cela n’arrange pas les scripteurs bien entendu… Mais ne baissons pas les bras. Il y a 10 points communs entres tous. Travaillons là-dessus de la manière suivante :
Prenons les 10 derniers caractères :
 SET MYDATE=%DATE:~-10%

A partir de là nous pouvons isoler l’année facilement (nous pouvions le faire aussi préalablement mais cela manquait du charme de l’utilisation de la variable).
SET YEAR=%MYDATE:~-4%

Nous devons repasser par la suite dans une demarche classique:
SET MONTH=%MYDATE:~3,2%
SET DAY=%MYDATE:~0,2%

Il ne reste plus qu’à afficher le résultat !
REM AFFICHAGE VARIABLES
ECHO %YEAR%
ECHO %MONTH%
ECHO %DAY%
PAUSE


Pourquoi ne pas y avoir pensé avant ? Je ne l’ai pas trouvé en recherchant sur Bing et Yahoo (et Google).
Bah passons nous l’avons maintenant !

No comments

Teasing : la fin

Thursday, 8. November 2007, 08:18:07

, , , ...

Je vous annonçait depuis quelques temps un petit teasing qui était en cours sur mon blog. J'y avais dispersé quelques indices et... Rien ne fut trouvé.

Mais où étaient-ils ?
Dispersé sur la colonne de droite, il y avait des « countdown » (décompte), quelques renseignements sur un nouveau blog (la barre latérale se met à jour avec les flux RSS)...

Et plein d'autres petites choses de ce style. Cela conforte donc l'idée que bien souvent seul le contenu est lu (le plus souvent par le flux, rarement par le blog) et que tout ce qui est autour est « skippé » !

Mais qu'ai-je donc à vous annoncer ? La diminution des fautes d'orthographe ? Certainement pas.
Alors voici : 

#Include <Date.au3>
Dim $acc, $delai, $alphabet, $msg1, $msg2
$acc = _DateToDayValue("2008","05","28")
Select
    Case ($acc - 31) < $acc
        SplashTextOn("Patienter", "Veuillez encore quelques temps 
patienter, " & @CR & _
                    "Construction en cours...", -1, -1, -1, -1)
        While ($acc - 31) < _DateToDayValue(@YEAR, @MON, @MDAY) > ($acc 
- 14)
            Sleep(1000)
        WEnd
        SplashOff()
    Case ($acc - 14) < _DateToDayValue(@YEAR, @MON, @MDAY) > ($acc + 14)
        SplashTextOn("Ouin", "Les jours sont comptés, cela " & _
                        "peut arriver d'une minute à l'autre !" & @CR & _
                        "Albine & Xavier sont heureux de " & _
                        "vous annoncer la venue au monde de ...")
        While ($acc - 14) < _DateToDayValue(@YEAR, @MON, @MDAY)
            Sleep(1000)
        WEnd
        SplashOff()
    Case $acc = _DateToDayValue(@YEAR, @MON, @MDAY)
        MsgBox(0 + 64, "Ouin !", "Albine et Xavier sont heureux " & _
                    "de vous annoncer la venue au monde de ..." & @CR & _
                    "Les autres informations, ne peuvent vous " & _
                    "être divulguée maintenant")       
EndSelect


Vous ne pensiez quand même pas que j'allais vous annoncer cela aussi facilement... Toutefois vous pouvez facilement comprendre en lisant le code :wink:

Futur(e) geek(ette) ? :D
Et qui dit tel événement dit une naissance digitiale aussi... Neuf mois et trois !

5 comments

Photos

Photo 042.jpgPhoto 030.jpgPhoto 036.jpgPhoto 015.jpgPhoto 044.jpgPhoto 022.jpgPhoto 023.jpgPhoto 017.jpgPhoto 039.jpgPhoto 040.jpg
January 2010
M T W T F S S
December 2009February 2010
1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 31

Groumphy sur Twitter