㈠ 求一个易语言每周定时运行和每天定时运行的源码
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _时钟1_周期事件
.局部变量 星期, 整数型
.局部变量 时间, 文本型
星期 = 取星期几 (取现行时间 ())
.如果真 (星期 = 1) ' 1 代表星期天,2 是星期一 。。。。
运行 (“要运行程序的绝对路径”, 假, )
.如果真结束
' ----------------------------------------------------
时间 = 到文本 (取现行时间 ())
.如果真 (时间 = “XX年XX月XX日XX时XX分XX秒”)
运行 (“要运行程序的绝对路径”, 假, )
.如果真结束
调试输出 (星期, 时间)
.子程序 __启动窗口_创建完毕
' 如果真 (取文本注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Run\apps”, ) = “”)
' 写注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Run\apps”, “要运行程序的绝对路径”)
' --------------------------------------------------------------------------------------------------
' 上面是写开机启动的,360会报警。。把编辑好的程序放到 启动 这个文件夹中也可以起到开机启动的效果,自己看着办吧
时钟1.时钟周期 = 1000
㈡ 易语言定时关机源码、
支持库 shell
.程序集 窗口程序集1
.程序集变量 关机时间, 日期时间型
.程序集变量 定时关机, 逻辑型
.子程序 __启动窗口_创建完毕
编辑框1.内容 = 到文本 (取现行时间 ())
.子程序 _按钮1_被单击
.局部变量 年, 文本型
.局部变量 月, 文本型
.局部变量 日, 文本型
.局部变量 时, 文本型
.局部变量 分, 文本型
年 = 到文本 (取年份 (取现行时间 ())) + “/”
月 = 编辑框2.内容 + “/”
日 = 编辑框3.内容 + “/”
时 = 编辑框4.内容 + “/”
分 = 编辑框5.内容 + “/”
关机时间 = 到时间 (年 + 月 + 日 + 时 + 分)
.如果真 (到文本 (关机时间) = “100年1月1日”)
信息框 (“时间填写错误”, 0, )
定时关机 = 假
返回 ()
.如果真结束
定时关机 = 真
.子程序 _时钟1_周期事件
编辑框1.内容 = 到文本 (取现行时间 ())
.如果真 (定时关机 = 真)
.如果真 (取现行时间 () = 关机时间)
时钟1.时钟周期 = 0
信息框 (“关机时间到了”, 0, )
关闭系统 (1, )
.如果真结束