Étape 2: Le code
Où il est dit utilisateur, vous pouvez mettre votre nom.
Définir les Sapi = Wscript.CreateObject ("SAPI. SpVoice")
Dim str
Si hour(time) < 12 puis
SAPI.Speak « Good Morning utilisateur »
d’autre
Si hour(time) > 12 puis
Si hour(time) > 16 puis
SAPI.Speak « Bonsoir User »
d’autre
SAPI.Speak « bon après-midi utilisateur »
fin si
fin si
fin si
SAPI.Speak « l’heure actuelle est »
Si hour(time) > 12 puis
SAPI.Speak heure (temps) -12
d’autre
Si hour(time) = 0 then
SAPI.Speak « 12 »
d’autre
SAPI.Speak hour(time)
fin si
fin si
Si minute(time) < 10 puis
SAPI.Speak « o »
Si minute(time) < 1 puis
SAPI.Speak « l’horloge »
d’autre
SAPI.Speak minute(time)
fin si
d’autre
SAPI.Speak minute(time)
fin si
Si hour(time) > 12 puis
SAPI.Speak « H »
d’autre
Si hour(time) = 0 then
Si minute(time) = 0 then
SAPI.Speak « Midnight »
d’autre
SAPI.Speak « H »
fin si
d’autre
Si hour(time) = 12 then
Si minute(time) = 0 then
SAPI.Speak « Midi »
d’autre
SAPI.Speak « H »
fin si
d’autre
SAPI.Speak « H »
fin si
fin si
fin si