减小字体
增大字体- ·上一篇文章：用脚本删除网络驱动器
- ·下一篇文章：VBS获取系统驱动信息
- ·百度中搜索更多的关于“取得注册表时间后求取间隔时间”相关内容
- ·谷歌中搜索更多的关于“取得注册表时间后求取间隔时间”相关内容
- ******申明******
- 本站文章内容有部分为收录网络中其他网友内容，DOS资源站不保证所有的代码都适合你使用。
- 由于编辑匆忙，有可能造成某些脚本文件出现丢失代码或代码无法运行的情况，请网友根据情况自行修改。
- 如果能将出错部分反馈给我，那就更好了。
取得注册表时间后求取间隔时间
先写入一个时间到注册表
Set WSHell = wscript.CreateObject("WSCRIPT.SHELL")
WSHell.Regwrite("HKEY_CURRENT_CONFIG\Software\Microsoft\windows\CurrentVersion\Internet Settings\timebegin"),time
保存为１.vbs
接下来就是读取注册表里记录的时间字符串
Set WSHell = wscript.CreateObject("WSCRIPT.SHELL")
a = WSHell.Regread("HKEY_CURRENT_CONFIG\Software\Microsoft\windows\CurrentVersion\Internet Settings\timebegin")
Dim n, s
n = DateDiff("n", a, Time)
s = DateDiff("s", a, Time)
Dim m
m = Int(s / 60)
If m > Max Then
Max = m
End If
If (s > 60 * m) Then
wscript.echo (n & "分" & (s - 60 * m) & "秒")
Else
wscript.echo s & "秒"
End If
保存为２.vbs
