Étape 6: Parler ~ l’ordinateur parle maintenant
Maintenant en VBScript !
--EDIT--
Le commutateur /f a été ajouté pour permettre le contenu d’un fichier à lire.
--LOT--
hors & setlocal enabledelayedexpansion echo la valeur discours = Wscript.CreateObject^("SAPI.spVoice"^) > « talk.vbs »
Si "% ~ 1" == « / » ? (
écho.
echo TALK "Texte" [paramètres]
écho.
Texte - l’expression que vous voulez parler de l’écho.
écho.
Echo [paramètres] :
echo/f - lire le contenu d’un fichier. « Texte » remplace le chemin d’accès du fichier.
écho.
ENDLOCAL
sortie/b
)
la valeur texte =
Si ([%2]==[/f]
Si existent « % ~ 1 "()
for /f "usebackq delims =" % (% 1) affectez texte =! texte! %%d Ko
) () autre
ENDLOCAL
sortie/b
)
)
Si [%2] == [] texte = % ~ 1
echo speech.speak « % de texte » >> « talk.vbs »
cscript //NoLogo //B talk.vbs
del Talk.vbs
ENDLOCAL
sortie/b
--VBS--
' Vérifier si elle a été exécutée correctement.
Si wscript.fullname = « C:\Windows\System32\wscript.exe » puis
WScript.echo "s’il vous plaît utiliser «"cscript /nologo alarm.vbs [paramètres] » » pour appeler ce script".
WScript.Quit
fin si
Discours de la valeur = wscript.createobject("sapi.spvoice") ' extraire l’objet de discours. « Test de paramètres non valides, etc.... "Décider où vous envoyer. « Parler normalement. ' Parlant le contenu d’un fichier. ' Utilisation :
Si wscript.arguments.count = 0 then
usage(1) ' si aucun paramètre n’est fourni, retourner errorlevel 1.
sinon si wscript.arguments.item(0) = « /? » puis
usage(0)
fin si
fin si
Si wscript.arguments.count = 2 then
Si wscript.arguments.item(1) = "/ f" puis
talk_file(Wscript.arguments.Item(0))
d’autre
usage(3) ' si le second paramètre n’est pas "/ f", retour errorlevel 3.
fin si
d’autre
Talk(Wscript.arguments.Item(0))
fin si
fonction talk(text)
Speech.Speak texte
WScript.Quit
EndFunction
fonction talk_file(file)
Set fso = wscript.createobject("scripting.filesystemobject")
Si ce n’est fso.fileexists(file) puis
usage(2) ' si le fichier n’existe pas, retournez errorlevel 2.
fin si
Définissez ofile = fso.opentextfile(file,1)
Speech.Speak ofile.readall()
WScript.Quit
EndFunction
fonction usage(errorlevel)
WScript.Echo
WScript.echo "TALK""texte" "[paramètres]"
WScript.Echo
WScript.Echo « Texte - l’expression que vous voulez parler ».
WScript.Echo
WScript.echo "[paramètres]: »
WScript.echo"/ f - lire le contenu d’un fichier." " Texte"" modifie le chemin d’accès du fichier. "
WScript.Echo
WScript.Quit(ERRORLEVEL)
EndFunction
Une fois de plus, l’utiliser comme vous le feriez une commande réelle, parce que c’est.