批处理怎样在指定的日期之后自动运行任务？

ln450 · 发表于 2011-11-16 19:06:12

本帖最后由 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:17

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

wc726842270 · 发表于 2011-11-17 16:23:39

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

ln450 · 发表于 2011-11-20 21:08:06

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

CrLf · 发表于 2011-11-20 23:53:25

回复 4# ln450

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

920168 · 发表于 2011-11-21 10:06:00

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:09

回复 6# 920168

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

ln450 · 发表于 2011-12-2 12:19:03

回复 5# CrLf

老师，帮帮我好吗？

920168 · 发表于 2011-12-21 13:57:09

回复 7# ln450

你在你1234.bat最后面加

del %0

复制代码

就好了！

awk · 发表于 2011-12-21 22:48:19

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

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] 批处理怎样在指定的日期之后自动运行任务？