Stap 1: Stap 1: Kladblok en opslaan
Wat je gaat willen doen is exemplaar en plak deze regel van codering in Kladblok: (het is tussen de # 's)
####################################################
Dim bericht, spreken
Message = InputBox ("Enter tekst", "Spreken")
Set Speak=CreateObject("sapi.spvoice")
Speak.Speak bericht
####################################################
Dit opslaan in Kladblok als "Speak.txt" zonder de aanhalingstekens, en vervolgens opnieuw opslaan als "Speak.vbs" zonder de aanhalingstekens. Het Speak.txt-bestand is van het notitieblok opslaan, en is niet vereist voor het Speak.vbs bestand te werken. That's it!
==============================================================
Als dit 15 favorieten krijgt, voorbereiden website gehannes!