Hacer saludar a su computadora usted cuando utilice (2 / 5 paso)

Paso 2: El código

Set Sapi = Wscript.CreateObject ("SAPI. SpVoice")

Dim str

Si hour(time) < 12 entonces
SAPI.Speak "Usuario Buenos días"
otra cosa
Si hour(time) > 12 entonces
Si hour(time) > 16 entonces
SAPI.Speak "usuario de buenas noches"
otra cosa
SAPI.Speak "buenas tardes usuario"
terminar si
terminar si
terminar si

SAPI.Speak "es la hora actual"

Si hour(time) > 12 entonces
SAPI.Speak (hora) -12
otra cosa
Si hour(time) = 0 then
SAPI.Speak "12"
otra cosa
SAPI.Speak hour(time)
terminar si
terminar si

Si minute(time) < 10 entonces
SAPI.Speak "o"
Si minute(time) < 1 entonces
SAPI.Speak "reloj"
otra cosa
SAPI.Speak minute(time)
terminar si
otra cosa
SAPI.Speak minute(time)
terminar si

Si hour(time) > 12 entonces
SAPI.Speak "H"
otra cosa
Si hour(time) = 0 then
Si minute(time) = 0 then
SAPI.Speak "Medianoche"
otra cosa
SAPI.Speak "A.M."
terminar si
otra cosa
Si hour(time) = 12 entonces
Si minute(time) = 0 then
SAPI.Speak "Mediodía"
otra cosa
SAPI.Speak "H"
terminar si
otra cosa
SAPI.Speak "A.M."
terminar si
terminar si
terminar si