有没有修改电脑系统安装信息的，比如系统安装时间的

du0518

Marvin

1.e (2.86 KB, 下载次数: 6)

昨天 20:30 上传

点击文件名下载附件

试下这个看看

du0518

Marvin 发表于 2026-8-11 20:30
试下这个看看

大佬，运行了没反应

Marvin

du0518 发表于 2026-8-11 22:37
大佬，运行了没反应

修改后要重启下电脑。。。。

du0518

Marvin 发表于 2026-8-11 22:37
修改后要重启下电脑。。。。

管理员运行的，修改过后重启没反应。。。

Marvin

du0518 发表于 2026-8-11 22:45
管理员运行的，修改过后重启没反应。。。

都没改还是改了哪个

du0518

Marvin 发表于 2026-8-11 22:47
都没改还是改了哪个

都没改。，。。。和修改之前一样

Marvin

du0518 发表于 2026-8-11 22:49
都没改。，。。。和修改之前一样

真机不好测，明天我拿虚拟机测试下

515889127

搜注册表 然后改

蛀牙

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

编辑框1.内容 ＝ 到文本 (取现行时间 ())

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
x	文本型
a	大数
m	大数
n	大数

a.导入数字 (取时间间隔 (到时间 (编辑框1.内容), 到时间 (“1601/1/1”), 5))
m.导入数字 (86400)
n.导入数字 (1000000000)
a ＝ a.乘 (m)
a ＝ a.乘 (n)
x ＝ a.导出文本 ()
x ＝ 取文本左边 (x, 取文本长度 (x) － 2)
系统_禁用文件系统重定向 ()
运行 (“reg add ” ＋ #引号 ＋ “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion” ＋ #引号 ＋ “ /v InstallDate /t reg_dword /d ” ＋ 到文本 (整数_有符号转无符号 (取时间间隔 (到时间 (编辑框1.内容), 到时间 (“1970.01.01 08:00:00”), 8))) ＋ “ /f”, 假, )
运行 (“reg add ” ＋ #引号 ＋ “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion” ＋ #引号 ＋ “ /v InstallTime /t reg_qword /d ” ＋ x ＋ “ /f”, 假, )
系统_恢复文件系统重定向 ()
信息框 (“ok,byebye!”, 64, )
结束 ()

i支持库列表	支持库注释
eCalc	数值计算支持库

.版本 2<br /> .支持库 eCalc<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 编辑框1.内容 ＝ 到文本 (取现行时间 ())<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 x, 文本型<br /> .局部变量 a, 大数<br /> .局部变量 m, 大数<br /> .局部变量 n, 大数<br /> <br /> a.导入数字 (取时间间隔 (到时间 (编辑框1.内容), 到时间 (“1601/1/1”), 5))<br /> m.导入数字 (86400)<br /> n.导入数字 (1000000000)<br /> a ＝ a.乘 (m)<br /> a ＝ a.乘 (n)<br /> x ＝ a.导出文本 ()<br /> x ＝ 取文本左边 (x, 取文本长度 (x) － 2)<br /> 系统_禁用文件系统重定向 ()<br /> 运行 (“reg add ” ＋ #引号 ＋ “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion” ＋ #引号 ＋ “ /v InstallDate /t reg_dword /d ” ＋ 到文本 (整数_有符号转无符号 (取时间间隔 (到时间 (编辑框1.内容), 到时间 (“1970.01.01 08:00:00”), 8))) ＋ “ /f”, 假, )<br /> 运行 (“reg add ” ＋ #引号 ＋ “HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion” ＋ #引号 ＋ “ /v InstallTime /t reg_qword /d ” ＋ x ＋ “ /f”, 假, )<br /> 系统_恢复文件系统重定向 ()<br /> 信息框 (“ok,byebye!”, 64, )<br /> 结束 ()