求达人制作VBS脚本

来源：百度知道 编辑：UC知道 时间：2024/05/14 18:20:46
求电脑达人制作一个VBS脚本 10分10秒按F5一次，1小时10秒按F6一次，2小时10秒按F7一次 ， 不要按键精灵那些辅助软件的脚本，只要VBS脚本， 做完后可以帮我发到邮箱windbellwind@126.com 或者直接告诉我怎么做

开始文件
'==========================================================================
'
' VBScript Source File -- Created with SAPIEN Technologies PrimalScript 4.0
'
' NAME: Jie
'
' DATE : 2008-8-15
'
' COMMENT:
'
'==========================================================================

'ok go
Dim a1
Do
Set a1=WScript.CreateObject("WScript.Shell")
WScript.Sleep 610000
a1.SendKeys "{f5}"
WScript.Sleep 3610000
a1.SendKeys "{f6}"
WScript.Sleep 7210000
a1.SendKeys "{f7}"
Loop '有循环的 可以无限次自动按键 ，不过好像把文件分成三个最好

'the end

哎，醒醒

Dim objws
Set objws=WScript.CreateObject("wscript.shell")
WScript.Sleep (10*60+10)*1000
objws.SendKeys "{F5}"
WScript.Sleep ((1*60*60+10)-(10*60+10))*1000
objws.SendKeys "