Make a vbs script to read the time

Hi, friendly neighborhood Super_Nerd here. As my first instructable I will show how to make a simple vbs script that reads the time and date with the narrorator. You will need:

-a computer running Windows 95 or higher (won't work on Macs sorry macs :( )
-notepad
-ability to copy and paste
-a brain (sorry jellyfish)

Step 1 A Pad of Notes

First open notepad

Windows 95-2000
Start>Programs>Acessories>Notepad

Windows XP-7

Start>All Programs>Acessories>Notepad

Once you have notepad open go onto the next step.

Comments

[beaver84]

This is a really cool script! Thanks for posting it!

[imBobertRobert]

how did you get to the speech properties?

[Super_Nerd]

Start>Control Panel>Speech

[imBobertRobert]

thanks!

[theformatter]

Nice script.

The only change I made was instead of saying every string as it was determined, I built a bigger string as the script executed, then at the very end issue one command to say that string. For example, instead of

Sapi.Speak hour(time)-12

I used

strSapi = strSapi & " " & hour(time)-12

and the last line of the script was:

Sapi.Speak strSapi

Made for a smoother output plus it works faster because you only need to make the speech api call once.

Also, my 'puter kept changing A.M. to "A meters", go figure, who'd a thunk the auto abbreviation expansion would go metric for my locale. I just changed that part of the string to be "A. M", adding a space before the M and removing the last period.

Nice to have this little script in my toolbox, I'm sure it will be useful down the road.


Jim


/* If you think the problem is bad now, wait until I fix it! */

[Super_Nerd]

I never knew that because I don't understand string commands. Thanks! :) BTW did you ever notice how it would say things like February two instead of February second? Thats gonna be one long if then else end if statment. :P About A.M. my speech engine doesn't do that. ? Well at least you could fix it on your own. ;)