Afficher la date en VbScript
Comment afficher la date en VbScript dans le format yyyy mm dd. C'est le bon format pour un fichier de log
Option Explicit
Dim ActualDay, MyDay, MyMonth
MyDay = Day(Now)
MyMonth = Month(Now)
If Len(MyDay) = 1 Then MyDay = "0" & MyDay
If Len(MyMonth) = 1 Then MyMonth = "0" & MyMonth
ActualDay = Year(Now) & "-" & MyMonth & "-" & MyDay
Wscript.echo ActualDay
La même chose mais avec l'heure en plus
Option Explicit
Dim ActualDay, MyDay, MyMonth, varTime
Dim varDateetHeure
MyDay = Day(Now)
MyMonth = Month(Now)
If Len(MyDay) = 1 Then MyDay = "0" & MyDay
If Len(MyMonth) = 1 Then MyMonth = "0" & MyMonth
ActualDay = Year(Now) & "-" & MyMonth & "-" & MyDay
varTime = Time
varTime = Replace(varTime, ":", "-") 'Remplacement des : par - car : est un caractère interdit dans les noms de fichiers
varDateetHeure = ActualDay & "_" & varTime
Wscript.echo varDateetHeure