win7系统修改系统安装时间
我有更好的答案
现在系统安装好了 ,想要修改cmd——systeminfo中显示的“系统初始安装时间”为自己想要的时间,如何实现?我问的是如何修改“系统初始安装时间”,不是修改右下角的现在时间! 懂系统内部代码的回答下。 系统是windows7 home basic 64bit的,能解决马上给分!,要具体点的。
可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。
- win7系统
- 系统安装
- 搜索资料
给写了个修改工具.........win7行不行就不知道了 没条件测试........ http://pan.baidu.com/share/link?shareid=419797&uk=3139800307 本程序在winxp采用delphi7编写(附源代码)原理是读写注册表 HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS NT\CURRENTVERSION 下InstallDate的值 这个值是 从1970/01/01 00:00:00 到系统安装时间 相差的 秒数 在注册表中 是以十六进制 表示的 手工修改注册表也是可以的但要手工计算 自己设定的一个年月日 和 1970/01/01 00:00:00 相差的秒数 还是比较麻烦的......... 在附上一个 AutoIt脚本源代码...........(AutoIt脚本中Date.au3中的时间日期函数 进行时间的加减运算非常方便,autoit脚本读写注册表也很方便........) #include <ButtonConstants.au3> #include <Date.au3> #include <DateTimeConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("系统安装时间修改器AutoIt开源版", 296, 163, 192, 114) $Date1 = GUICtrlCreateDate("", 40, 40, 105, 25, 0) $Button1 = GUICtrlCreateButton("设置", 176, 40, 73, 33) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $str = GUICtrlRead($Date1) $str = StringReplace($str, "-", "/") $s = _DateDiff('s', "1970/01/01 00:00:00", $str & " 00:00:00") RegWrite ( "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS NT\CURRENTVERSION", "InstallDate", "REG_DWORD", $s) MsgBox(0, "","完成") EndSwitch WEnd
-
提问者评价
-
谢谢!
评论
|
给力1
不给力0