标题: 自动更改由BIOS掉电引起的年分错误 [打印本页]
作者: bob1989 时间: 2007-7-12 10:00 标题: 自动更改由BIOS掉电引起的年分错误
@echo off
@Rem EditDate
@Rem 以下所有的2007可以更改.只要符合年份的格式要求就行了.
@Date /t > a.txt
@for /f "tokens=1" %%m in (a.txt) do set mm=%%m
@Echo %mm% > a.txt
@for /f "tokens=1 delims=-" %%a in (a.txt) do set aa=%%a
@for /f "tokens=2 delims=-" %%b in (a.txt) do set bb=%%b
@for /f "tokens=3 delims=-" %%c in (a.txt) do set cc=%%c
::对比年份,当年份超越2007年则自动改回来
@if %aa% GTR 2007 goto EditTime
::对比年份,当年分少于2007年则运行修改
@if %aa% LSS 2007 goto EditTime
@goto End
:EditTime
::修改系统时间
@date 2007-%bb%-%cc%
:End
@del a.txt
保存放到启动里就OK了@Rem EditDate
@Rem 以下所有的2007可以更改.只要符合年份的格式要求就行了.
@Date /t > a.txt
@for /f "tokens=1" %%m in (a.txt) do set mm=%%m
@Echo %mm% > a.txt
@for /f "tokens=1 delims=-" %%a in (a.txt) do set aa=%%a
@for /f "tokens=2 delims=-" %%b in (a.txt) do set bb=%%b
@for /f "tokens=3 delims=-" %%c in (a.txt) do set cc=%%c
::对比年份,当年份超越2007年则自动改回来
@if %aa% GTR 2007 goto EditTime
::对比年份,当年分少于2007年则运行修改
@if %aa% LSS 2007 goto EditTime
@goto End
:EditTime
::修改系统时间
@date 2007-%bb%-%cc%
:End
@del a.txt
作者: bob1989 时间: 2007-7-12 10:03
这个暂时只能改年份
具体时间不能在自己的系统里得到
必须上网获取
有高手能写个获取具体时间的P吗？
作者: jastyg 时间: 2007-7-12 10:21
我觉的意义不大，还不如用net time去同步时间呢
作者: bob1989 时间: 2007-7-13 19:48
我在网吧上网就遇到过这种情况
时间一下到2095年了
导致QQ登陆失败
QQ又没给什么错误提示
知道的改回来就OK了
不知道的搞半天都不知道怎么回事
整天喊网管
这个程序是我在网吧系统的启动里找到的
网吧的启动里还有一个BAT是绑定网卡的
作者: zh159 时间: 2007-7-14 00:10
按LZ要求应该是XP的：
@echo off
if "%date:~0,4%" == "2007" exit
date 2007-%date:~5,5%
exit
或者直接：if "%date:~0,4%" == "2007" exit
date 2007-%date:~5,5%
exit
@echo off
date 2007-%date:~5,5%
exit
date 2007-%date:~5,5%
exit
作者: bob1989 时间: 2007-7-14 13:26
zh159兄给的代码真的太爽了
一句话就达到目的了
真佩服
作者: bob1989 时间: 2007-7-14 13:40
干脆BAT都不要了
直接一个快捷方式
cmd.exe /c date 2007%date:~4,6%