怎么让程序在每天的指定时间内自动运行?
怎么让程序在每天的指定时间内自动运行?我想写个小程序,可以让它在每天的指定时间内自动运行,比如我想写个自动关机的时候想让它在每天的11:30自动关机,那么我该如何实现呢?请高手指点指点谢谢!
恩 我想我应该把问题说明白点:首先,先写个开机自动运行的程序,再通过那个开机自动运行的程序来执行我们的关机程序!我主要是不知道怎么写那个在指定时间内执行关机命令的程序!我把我的思路告诉大家。现在有两个程序:程序A和程序B 把A写成开机自动启动,在A的加载窗体事件过程里加入如下代码让它实现开机启动:
Private Sub Form_Load()
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe" '开机启动代码
End Sub
---------------------------------------------------------
Private Sub Timer1_Timer()
‘再用shell执行我们事先写好的关机批处理
dim a as string
if a=time then
shell "c:\关机批处理.bat"
time=11:30
END IF
End Sub
而“关机批处理.bat”
就是我所说的B程序!
请问我这么写对吗?