批处理之家 - Powered by Discuz! Board

标题: [文件操作] 批处理怎样在指定的日期之后自动运行任务？ [打印本页]

作者: ln450 时间: 2011-11-16 19:06 标题: 批处理怎样在指定的日期之后自动运行任务？

本帖最后由 ln450 于 2011-11-20 23:46 编辑

要求：在某一指定日期（如2011年12月1日）之后，开机或重启就自动运行某一****.BAT（如1234.bat，这个1234.bat运行后本身自我删除）。保证1234.bat运行后，这个vbs再自我删除。

Set ws=WScript.CreateObject("WScript.Shell")
if date="2011-12-01" then ws.run """C:\Program Files\ABC\1234.bat""",0
On Error Resume Next
Set fso = CreateObject("Scripting.FileSystemObject")
WScript.Sleep 1000
fso.DeleteFile(WScript.ScriptName)

如上不足是：当时间到了2011-12-01后不重启或开机，日期超过了就无法执行，如到了2011-12-12，就无法进行。请老师帮改进。谢谢！！

补充：另加上自我删除后，1234..bat没有运行就自我删除了。怎样让这个VBS判断1234.bat已经运行或者这个文件不存在后，再自我删除？

作者: HAT 时间: 2011-11-17 00:15

格式化没用，照样能恢复数据，你需要用专业的工具去擦写磁盘。
搞定之后再卖吧。

作者: wc726842270 时间: 2011-11-17 16:23

让文件重新占满整个硬盘，或者低格了吧，（前久只是理论，但是也很麻烦，后都很危险）

作者: ln450 时间: 2011-11-20 21:08

原来我是想调用批处理进行格式化分区，2楼、3楼都钻到格式化的牛角尖去了，没有可行的建议和帮助。现缩小了范围，请各位老师帮忙。

作者: CrLf 时间: 2011-11-20 23:53

回复 4# ln450

那你缩小到了什么样的范围呢？

作者: 920168 时间: 2011-11-21 10:06

Set ws=WScript.CreateObject("WScript.Shell")
if date>"2011-12-01" then ws.run """C:\Program Files\ABC\1234.bat""",0
On Error Resume Next 
Set fso = CreateObject("Scripting.FileSystemObject")
WScript.Sleep 1000 
fso.DeleteFile(WScript.ScriptName) 
复制代码

作者: ln450 时间: 2011-11-21 15:46

回复 6# 920168

要求：在某一设定日期（如2012年1月15日）后，无论是哪一天，只要开机或重启，就自动运行指定的文件，如1234.bat。运行后删除自身和1234.bat。谢谢！

作者: ln450 时间: 2011-12-2 12:19

回复 5# CrLf

老师，帮帮我好吗？

作者: 920168 时间: 2011-12-21 13:57

回复 7# ln450

你在你1234.bat最后面加

del %0
复制代码

就好了！

作者: awk 时间: 2011-12-21 22:48

一看就知道是打算干坏事的哼哼

欢迎光临批处理之家 (http://bbs.bathome.net/)