1

Text to Speech のコードを作成し、Windows 7 に Microsoft Speech SDK をインストールしました。このコードを Internet Explorer で開いても、何も起こりません。

<html>
  <head>
  </head>
  <body>
  <input type="text" name="textinput" size="30">
   <script type="text/vbscript">
    Sub SpeakIt
       Dim msg, sapi
       msg= textinput.Value
       Set sapi=CreateObject("sapi.spvoice")
       sapi.Speak msg
     End Sub
   </script>
   <input type="button" value="speak" onClick="SpeakIt">
  </body>
</html>
4

2 に答える 2

2

Speakボタンで SpeakIt 関数を呼び出す場所にブレーキが必要なので、これを試してください。

<html>
<head>
</head>
<body>
  <input type="text" name="textinput" size="30">
  <script type="text/vbscript">
    Sub SpeakIt
       Dim msg, sapi
       msg= textinput.Value
       Set sapi=CreateObject("sapi.spvoice")
       sapi.Speak msg
     End Sub
 </script>
 <input type="button" value="speak" onClick="SpeakIt()">
 </body>
</html>

もちろん、ユーザーはページで実行されている ActiveX スクリプトについて警告されます。

于 2013-10-05T08:44:34.273 に答える