几个简单的VBS脚本程序以及其JS实现
2024-09-29 03:53:37
1 语音发声脚本,调用sapi.spvoice读英语hh
保存为say.vbs,点击打开就可以念诗:
set objTTS = CreateObject("sapi.spvoice")
objTTS.speak("问来问去的问题too young too simple,sometimes naive")
使用JS要有activeX控件
var VoiceObj = new ActiveXObject("Sapi.SpVoice"); VoiceObj.speak("");
可以调用百度的API:
<!DOCTYPE html>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<title>语音测试</title>
<script type="text/javascript">
function doTTS(){
var ttsDiv = document.getElementById('bdtts_div_id');
var ttsAudio = document.getElementById('tts_autio_id');
var ttsText = document.getElementById('ttsText').value;
//参数spd为语音速度 ttsDiv.removeChild(ttsAudio);
var au1 = '<audio id="tts_autio_id" autoplay="autoplay">';
var sss = '<source id="tts_source_id" src="http://tts.baidu.com/text2audio?lan=zh&ie=UTF-8&spd=3&text='+ttsText+'" type="audio/mpeg">';
var eee = '<embed id="tts_embed_id" height="0" width="0" src="">';
var au2 = '</audio>';
ttsDiv.innerHTML = au1 + sss + eee + au2; ttsAudio = document.getElementById('tts_autio_id'); ttsAudio.play();
}
</script>
</head>
<body>
<div>
<input type="text" id="ttsText">
<input type="button" id="tts_btn" onclick="doTTS()" value="播放">
</div>
<div id="bdtts_div_id">
<audio id="tts_autio_id" autoplay="autoplay">
<source id="tts_source_id" src="http://tts.baidu.com/text2audio?lan=zh&ie=UTF-8&spd=4&text=请输入" type="audio/mpeg">
<embed id="tts_embed_id" height="0" width="0" src="">
</audio>
</div>
</body>
</html>
2 自动发送消息:
vbs脚本:
On Error Resume Next
Dim wsh,ye
set wsh=createobject("wscript.shell")
for i= to
wscript.sleep
wsh.AppActivate("银翼")
wsh.sendKeys "^v"
wsh.sendKeys i
wsh.sendKeys "%s"
next
wscript.quit
打开桌面上发给银翼的对话框,即可发送复制在剪切板的消息
3 打开桌面应用
保存为open.vbs:
set ws=createobject("wscript.shell") Rem ws.run"打开文件所使用的程序+空格+程序路径",x,ture ws.run"CloudMusic.exe E:\lanInstall\lanMore\lanMusic\CloudMusic\",,true
即可打开网易云音乐,可用于一次打开很多软件,其中第二个参数的意义:
0 隐藏一个窗口并激活另一个窗口。
1 激活并显示窗口。如果窗口处于最小化或最大化状态,则系统将其还原到原始大小和位置。第一次显示该窗口时,应用程序应指定此标志。
2 激活窗口并将其显示为最小化窗口。
3 激活窗口并将其显示为最大化窗口。
4 按最近的窗口大小和位置显示窗口。活动窗口保持活动状态。
5 激活窗口并按当前的大小和位置显示它。
6 最小化指定的窗口,并按照 Z 顺序激活下一个顶部窗口。
7 将窗口显示为最小化窗口。活动窗口保持活动状态。
8 将窗口显示为当前状态。活动窗口保持活动状态。
9 激活并显示窗口。如果窗口处于最小化或最大化状态,则系统将其还原到原始大小和位置。还原最小化窗口时,应用程序应指定此标志。
10 根据启动应用程序的程序状态来设置显示状态。
4 打开cmd命令行
运行node hello.js,并把结果保存到x.txt
Set ws = CreateObject("WScript.Shell") ws.Run "cmd /c node hello.js -an>>x.txt",
5 其他小命令:
rem a 关闭计算机 dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "shutdown -f -s -t 00", ,true rem b 无限数羊 Set s = CreateObject("sapi.spvoice")
i=
do
s.speak i
i=i+
loop rem c 不断按下alt+f4键
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
do
wscript.sleep
WSHshell.SendKeys "%{F4}"
loop rem d 弹窗
dim s
do until s=
s=s+
msgbox "this is enter",
loop
VBS简单教程http://www.cnblogs.com/BeyondTechnology/archive/2011/01/10/1932440.html
例子https://github.com/lanleilin/lanVBS
最新文章
- lock关键字只不过是C#提供的语法糖
- [codility]Grocery-store
- POJ 1564(HDU 1258 ZOJ 1711) Sum It Up(DFS)
- C++模板:二分查找
- 日志分析工具-ApexSQL介绍
- FreeMarker 实例
- [翻译] 使用ElasticSearch,Kibana,ASP.NET Core和Docker可视化数据
- ADO.NET 对数据操作
- JENKINS针对不同项目组对用户进行权限分配
- [PHP] php + phpstudy + phpstrom + xdebug + postman开启调试
- 卓越的目标检测器Pelee
- sublime Text如何取消两栏窗口?
- 20155208徐子涵 2016-2017-2 《Java程序设计》第4周学习总结
- 关于能量场和力场弯曲空间的实验证明 EXPERIMENTAL PROOF ON THE BENDING SPACE OF ENERGY FIELD AND FORCE FIELD
- python-模板方法模式
- LeetCode 题解之Remove Duplicates from Sorted List II
- 第二章:冠词(Les articles)
- Java JNI的具体介绍
- IL指令
- Java API 之 动态代理