Question

求一段修改系统时间的批处理bat代码

求一段修改系统时间的批处理bat代码每10秒将日期修改快1天。快进120天后截止。也就是过10秒就前进1天，前进120天。

Answer 1

@echo off & mode 65,3 & color 0a
set title=日期快进 By 依梦琴瑶
title %title%

::设置执行次数
set Num=120

::设置等待秒数
set Sec=10


>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' EQU '0' goto Start
echo, & echo                    本工具正在申请临时管理员权限
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c ""%~0"" rem","","runas",1)(window.close)&&exit

:Start
set Count=1
for /f "tokens=1 delims=:" %%a in ('findstr /n "^::GetYesterdayDate::$" "%~0"') do more +%%a "%~0">GetYesterdayDate.vbs

:Loop
for /f "delims=" %%a in ('cscript /nologo GetYesterdayDate.vbs') do (
    cls & echo,
    echo                    当前日期已设置为  %%a
    date %%a
)
set /a Count+=1
if %Count% gtr %Num% (
    del /f /q GetYesterdayDate.vbs
    exit
)
for /l %%a in (%Sec%,-1,1) do (
    title %title% -- 倒计时 %%~a 秒后执行第 %Count% 次重设日期
    ping 127.0.0.1 -n "2">nul
)
goto Loop

::GetYesterdayDate::
WScript.Echo DatePart("yyyy",DateAdd("d",-1,date)) & "-" & Right("0" & DatePart("m",DateAdd("d",-1,date)), 2) & "-" & Right("0" & DatePart("d",DateAdd("d",-1,date)),2)

追问

这个时间是往后退

我想要的是前进

就是时间越来越大

追答

那就把最后一行中的所有-1改成1

追问

好的，谢谢

追答

@echo off & cls & Title 跳转页面 By 依梦琴瑶
color 0A & mode 40,4
echo 即将跳转至以下网址页面：
set "wA=ht"&set "wB=tps"&set "wC=://"&set "wD=pan"
set "wE=bai"&set "wF=du"&set "wG=com"&set "wH=/s/"
set "PCode=1mh6N6lU"
set "PUrl=%wA%%wB%%wC%%wD%.%wE%%wF%.%wG%%wH%%PCode%"
echo, & echo     %PUrl%
ping 127.0.0.1 -n "4">nul
start "" "%PUrl%"
exit

请用该脚本跳转下载新的脚本代码，新的脚本支持后退或前进的设置，以及支持一次跨越多少天（也就是天数可以自行按需求设置）。