[其他] 让批处理发声--- 朗读单词

lixiaodaoaaa

★ 让批处理发声--- 朗读单词 ★                                                        今天给大家一起学习的是让批处理发声。希望不会的，我们一起学习，高手不要笑话我就可以了。讲的非常的罗嗦，希望楼下跟帖的不要骂我就是了.......肯定有什么不对的地方，恳请大家批评指正， 共同提高，共同进步！ 这里用到了批处理和vbs结合。我们还是先看代码吧： ------------------------------------------------------------------------------------------------------------- @echo off mshta vbscript:createobject("sapi.spvoice").speak("I love bathome")(window.close)                   pause 复制代码 ------------------------------------------------------------------------------------------------------------- 很简单吧？ 这里就是用批处理的mshta命令把bat与vbs结合起来了，用vbs调用函数发声，很不错！这个mshta的意义非常的重要，如果要想让bat和vbs结合就非得用mshta命令 mshta vbscript:create............................. 这里的vbscript的意思是bat与vbs脚本宿主的结合 当然可以把javascript结合起来，也是可以的，以后有时间学了javascript的话， 我就把java代码干上去，大家一起学习下哈或者其他脚本文件都可以往后面跟下去............... 文章最后面有个简单的javascript的例子，希望大家也去实验下效果.... vbscript就说明后面跟的是vbs脚本的内容，后面的脚本就是vbs脚本..... ------------------------------------------------------------------------------------------------------------- 我们接着往下看： vbscript:createobject("sapi.spvoive").speak("I love bathome")(window.close) 解说：这里创建了一个sapi.spvoice对象，并调用它的speak方法，"I love bathome"是要朗读的内容。 当然要朗读的i love bathome,也可以换成其他的东西，例如my name is lixiaodao 或者i love ****** 呵呵，都是可以的...................但是可不能换成汉字，它可不认识汉字，呵呵…… 接着解释后面的(window.close) 在解释它之前，我们可以把代码后面的 （window.close）去掉，去实验下， ------------------------------------------------------------------------------------------------------- @echo off mshta vbscript:createobject("sapi.spvoice").speak("I love bathome")                pause 复制代码 ------------------------------------------------------------------------------------------------------- 我们会发现确实是朗读了i love bathome,但是朗读后，就跳出了一个窗口， window.close就是关闭这个窗口的.................... 可以把代码优化一下，看起来操作起来好一点，我写了下面的代码; ----------------------------------------------------------------------------------------------------------------------- @echo off color a2 title 批处理发声实验 by:lixiaodaoaaa qq:346825741 @mode con cols=50 lines=11 mshta vbscript:createobject("sapi.spvoice").speak("I love bathome")(window.close) mshta vbscript:createobject("sapi.spvoice").speak("my name is lixiaodao")(window.close) mshta vbscript:createobject("sapi.spvoice").speak("my qq number is 346825741")(window.close) pause&exit 复制代码 --------------------------------------------------------------------------------------------------------- 举个很简单的javascript的例子，大家实验下bat与javascript的结合. mshta javascript:window.alert("欢迎来到批处理之家，批处理之家欢迎您！")(window.close()) 复制代码 window.close不用讲了，已经讲过了，讲一下alert，就是弹出消息的意思，实验下，看效果...... 代码很简单，我不做多说明，欢迎复制代码实验下，看效果，呵呵 写完了，确实很罗嗦，恳请大家批评指正............................. 写的很垃圾很仓促，定有不妥之处，恳请各位大师，各位专家批评指正 感谢各位，提出好的思路和方法.....

＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
版务执行：Batcher
执行时间：2008-09-06
操作内容：从"批处理教学&资料"转移帖子到"代码咨询&讨论"；分类；删除标题中的特殊字符
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊


[ 本帖最后由 lixiaodaoaaa 于 2008-9-7 12:12 编辑 ]

lixiaodaoaaa

恳请管理员把它移动到教学资料区，容易出问题。。汗。。。
发错地方了，我自己改不过来

pusofalse

与java相结合的代码貌似有点错误，楼主试下。

zqz0012005

应为

mshta javascript:window.alert("欢迎来到批处理之家，批处理之家欢迎您！")(window.close())
复制代码

window.alert可以只写成alert

lixiaodaoaaa

谢谢pusofalse
问题已经改正，感谢zqz12005写的代码已经成功的更正过了，
你们很耐心很细致，再次的感谢你们的支持和评论

lixiaodaoaaa

突然发现一个问题啊，有的系统还可以朗读汉语，汗
我靠，你不信实验下，看看你的电脑能不能读汉语啊？
如果能读汉语，那就帅得了，读个  “我真的好想你啊”
“我爱你******”
哈哈，或者什么恐怖的，帅啊！

qq641255849

貌似微软有中文语音包下载...

zqz0012005

朗读中文参见：
利用TTS实现中英文混读

鉴于已在非常发表，不在此处重复。

qingfengzhixia

不错,支持一下

wbwchina

太羡慕了！太羡慕了！

lixiaodaoaaa

哈哈，不难大家努力 学习啊
希望我们共同把学习上的心得拿出来，共同学习。共同提高，我是菜鸟

wolfan

怎么发女声呢？ 男声无爱啊。

77七

我想用顶楼的第一段代码朗读 一段数字字符串，执行顶楼的第一段代码（未修改），报错。系统为win10




我想写成以下的形式，请路过的大佬帮忙修改下，谢谢！

@echo off
rem code...
set str=123456789
mshta vbscript:createobject("sapi.spvoice").speak("%str%")(window.close)
rem code...
pause
复制代码

Five66

回复 13# 77七

试试将下面的保存为vbs，看能否正常运行

createobject("sapi.spvoice").speak "123456789"

不能的话，也许是vbs组件或sapi组件或相关设置出问题
能的话，大概是hta使用的浏览器或ie版本问题

77七

回复 14# Five66

不能正常运行，报错几乎和上图相同，只有代码变了，代码：0  变为  代码：8007007E