Heure et date en vbscript

Soyez le premier à donner votre avis sur cette source.

Snippet vu 10 174 fois - Téléchargée 30 fois

Contenu du snippet

Ce script n'affiche que des msgbox !
Il dit l'heure et la date du jour !
Mais je laisse cette source au débutant !

Source / Exemple :


On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\\\" & strComputer & "\\root\\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_LocalTime",,48)

For Each objItem in colItems
Wscript.Echo "Nous somme le : " & objItem.Day & " du " & objItem.Month & " en " & objItem.Year
Wscript.Echo "Il est : " & objItem.Hour & " : " & objItem.Minute & " : " & objItem.Second & " " & objItem.Milliseconds & " Secondes !"
Next

Conclusion :


Il donne pas mal d'info sur le temps je pense je ne connais que sa pour le temps !
Voila a+

A voir également

Ajouter un commentaire Commentaires
Messages postés
868
Date d'inscription
dimanche 26 décembre 2004
Statut
Membre
Dernière intervention
26 février 2008
1
C'est clair, tu t'es vraiment compliqué l'existence alors que c'est tout simple !!!
Messages postés
232
Date d'inscription
dimanche 19 octobre 2003
Statut
Membre
Dernière intervention
24 janvier 2006

moi j'ai quand meme mis la date sous se format la

mNous sommes le mardi 3 fevrier 2004 il est 16h30
Messages postés
25
Date d'inscription
mardi 16 décembre 2003
Statut
Membre
Dernière intervention
3 février 2004

mais c'est ..... super inutile

voila le code le plus simple :

msgbox"noule somme le " & date() & " et il est " & time()

TRO dur lol

mais ché pas ce que ta fait pour faire un script aussi compliquer pour l'heure et la date !!!!!
Messages postés
232
Date d'inscription
dimanche 19 octobre 2003
Statut
Membre
Dernière intervention
24 janvier 2006

je trouve ca tres compliqué
si j'ai compris car j'ai pas testé ca donne juste la date et l'heure systeme

tu peux faire ca
msgbox ("nous somme le" & day(now) & month(now) & year(now) & "il est " & time)

ou mieux
MsgBox ("nous somme le " & Format(Now, "dddd d mmmm yyyy") & " à " & Format(Now, "ttttt"))

bon c'est pas pour critiquer mais il y a plus simple
j'arrive meme pas a l'utiliser

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.