在情人节当天晚上,本人就发了一个利用VBS写一个发声文件,然后放在启动里面,那么,如何定时启动呢?做一个定时的发声备忘录也不错啊!方法如下:
建立一个备忘文件“1.vbs”,也可以改名为其他的,那下面的1.vbs自己改名,对应即可,内容如下:
CreateObject("SAPI.SpVoice").Speak "这里输入备忘内容"
然后,建立一个beiwang.vbs,放在D盘或者其他盘根目录下【如果你熟悉路径随便放】,这里以放D盘为例!那么,文件路径就是D:\1.vbs,时间设置为7点10分!
beiwang.vbs内容:
Option Explicit
On Error Resume Next
Dim sProgramme, sRunTime, aTime, iHour, iMinute, oShell
sProgramme = "D:\1.vbs"
sRunTime = "7:10" '
aTime = Split(sRunTime, ":")
iHour = CInt(aTime(0))
iMinute = CInt(aTime(1))
Do While True
If (Hour(Now) = iHour) And (Minute(Now) = iMinute) Then
Set oShell = CreateObject("WScript.Shell")
oShell.Run sProgramme, 1, False
Set oShell = Nothing
Exit Do
End If
WSH.Sleep 1000
Loop
如果需要每天执行这个任务则把这个beiwang.vbs放在启动目录里面,1.vbs放D盘不变,现在要执行只需要双击,不会有反应的,等下自动就会播放备忘的内容【注意,如果电脑不支持中文发音可以找下相应的语音文件,一般默认是支持的,XP未测试!】
建立vbs文件的方法,桌面-右击-新建-文本文档.txt-编辑文本-保存-重命名为*.vbs文件,*是文件名
您可以选择一种方式赞助本站
支付宝扫一扫赞助
微信钱包扫描赞助