vbscript - VBScript 不识别说话命令？

Question

我需要帮助。我正在尝试用批处理制作个人助理，为了效果，我希望我的电脑会说话。我以前使用过语音代码，甚至在这台计算机上，但由于某种原因，当我现在尝试使用语音命令时，它似乎不起作用。这是我通常使用的代码：

Set objVoice=CreateObject("SAPI.SpVoice")
objVoice.Speak("Insert Message Here")

我不知道发生了什么，但是当我运行脚本时，我得到了这个错误：

线路：2

字符：1

错误：句柄无效。

代码 89970006

来源（空）

请帮我解决这个错误。提前致谢。顺便说一句，我确实有语音 API，并且我在控制面板中的文本到语音的工作。它似乎是 .vbs 文件。

score 0 · Accepted Answer

尝试这个：

Set Speak = CreateObject("sapi.spvoice")

Speak.Speak "Text Goes Here"

或者，如果你想让它说出你输入的内容，你可以这样做，

Dim Message, Speak
Set Speak=CreateObject("sapi.spvoice")

Message=InputBox("Enter text","Speak")
Speak.Speak Message

1 回答 1