VBScript不识别说话命令？

Question

我需要帮助。我正在尝试用批量制作一个私人助理，为了效果，我希望我的电脑能说话。我之前使用过说话代码，甚至在这台电脑上，但出于某种原因，当我现在尝试使用speak命令时，它似乎不起作用。这是我经常使用的代码：

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

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

行：2

Char：1

错误：句柄无效。

代码89970006

来源（null）

请帮我修复此错误。提前致谢。 通过这种方式，我有语音API，我的控制面板中的文本到语音工作。它似乎是.vbs文件。

Answer 1

试试这个：

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