[特效代码] 批处理怎样实现指定时间范围内运行和结束程序？

xzwcn

如在12:00时自动打开qq，12.30自动结束，用vbs脚本吗？

结束方法参考以下例子：
下面的代码保存为.vbs。 时间为24小时制。 每隔15秒扫描一次，发现QQ就关闭，开始时间8:20
结束时间:9:50， 可自己更改。 当前时间超过结束时间，脚本自动结束。
-----------------------------------------------代码如下-------------------------------------------------------

Dim wsh
sTart = "8:20"
eTart = "9:50"
Set wsh = CreateObject("Wscript.Shell")
Tims = FormatDateTime(Time,4)
chTST tims

Sub chTST(tim)

sT = FormatDateTime(sTart,4)
eT = FormatDateTime(eTart,4)

If (tim>sT) And (tim<eT) Then
wsh.Run "taskkill /f /im qq.exe",,True
If tim>eT Then
WScript.Quit
End If
WScript.Sleep 15000
Sel = Chr(34)&WScript.ScriptFullName&Chr(34)
Wsh.Run Sel,,True
End If
End Sub
复制代码