さびしい時にXPとおしゃべりしてみる？
XPには音声読み上げソフトがデフォルトでインストールされている
今回はその音声読み上げソフトを利用したVBScriptを紹介する
ノートパッドを開いて以下のコードをまず入力しよう
コピーアンドペーストでOKだ
[source:vb]
Dim msg, sapi
msg=InputBox(“Enter your text”,”my96soft!”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak msg
[/source]
最後に作成した.txtファイルをmy96soft.vbsとして保存しよう
これで完成
起動した後テキスト入力をしてOKを押せば音声を読み上げてくれる
XP/VISTAで動作する
残念ながら日本語は通らない、英語で試し見よう
あなたは何をXPに言わせたい？
実行するとこんな画面が出てくる
完成しているスクリプトをここからダウンロードすることもできる
viaWindows Text to Speech Convertor: Try at Home | GeniusHackers.Com
Recent Comments