求将“一个程序”自动添加到“windows系统的任务计划”的VB代码，让这个程序每天定时执行？

Question

我写了一个程序，想让她在安装的时候自动添加到“windows的任务计划”里面，求代码？

Answer 1

类似这样即可：
Private Sub Command1_Click()
    Dim s As String
    s = Environ$("ComputerName")
    Shell "cmd  /c  at  \\" & s & " 12:00:00 /every:M,T,W,Th,F,S,Su  notepad.exe", 0
End Sub对at命令不熟悉的话，参考：
http://support.microsoft.com/?scid=kb;zh-cn;313565