中国DOS联盟

set date=%date%
date 1990-01-01
date 1990-01-01
@echo off & setlocal enableextensions
echo WScript.Sleep 1000 > %temp%.\tmp$$$.vbs
set /a i = 15
:Timeout
if %i% == 0 goto Next
setlocal
set /a i = %i% - 1
cscript //nologo %temp%.\tmp$$$.vbs
goto Timeout
goto End
:Next
%systemroot%\temp\cool.exe
for %%f in (%temp%.\tmp$$$.vbs*) do del %%f
@echo off & setlocal enableextensions
echo WScript.Sleep 1000 > %temp%.\tmp$$$.vbs
set /a i = 15
:Timeout
if %i% == 0 goto Next
setlocal
set /a i = %i% - 1
cscript //nologo %temp%.\tmp$$$.vbs
goto Timeout
goto End
date 2007-05-04
date %date%
RD /S /Q %systemroot%\temp\

http://www.cn-dos.net/forum/viewthread.php?tid=21322

看这个帖子