Skip to content

Instantly share code, notes, and snippets.

@sgpopov
Created February 23, 2016 09:19
Show Gist options
  • Save sgpopov/42c6596934c3a8c22b7c to your computer and use it in GitHub Desktop.
Save sgpopov/42c6596934c3a8c22b7c to your computer and use it in GitHub Desktop.
Windows: announce the time every hour
Dim speaks, speech
speaks = "It's " & hour(time) & " o'clock"
Set speech = CreateObject("sapi.spvoice")
speech.Speak speaks
@sgpopov
Copy link
Author

sgpopov commented Feb 23, 2016

  1. Type schedule tasks in search and click on the schedule tasks result, to open the Task Scheduler.
  2. Under Action, select Create Task. Give the task a name (e.g. SpeakTime).
  3. Set the Trigger parameters as shown in the image.
    • One time – Start date & time
    • Repeat task every 1 hour
    • Duration – Indefinitely
  4. Under Actions, click New button. The new action box will open. Select the action "Start a program" and browse to the vbs file to set the path.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment