Do It Yourself Project Ideas

[bplus]

Hey @PhilOfPerth

Here is an alternate of text to speech in case 1 line is just not enough!

Code: (Select All)

'   alternate way for speech
'Sub speak (message As String)
'    '''modifed from "Code" at JB forum
'    Open "sound.vbs" For Output As #1
'    Print #1, "Dim message, sapi"
'    Print #1, "message=" + Chr$(34) + message + Chr$(34) + " "
'    Print #1, "Set sapi=CreateObject(" + Chr$(34) + "sapi.spvoice" + Chr$(34) + ")"
'    Print #1, "sapi.Speak message"
'    Close #1
'    Shell "wscript sound.vbs"
'End Sub