Comments on: How to Determine the Last Shutdown Date and Time in Windows XP/2003/Vista http://www.winhelponline.com/blog/how-to-determine-the-last-shutdown-date-and-time-in-windows-xp2003vista/ Troubleshooting Windows 7/XP/Vista, Fixes & Tweaks | General Productivity Tips Wed, 08 Feb 2012 02:27:21 +0000 hourly 1 http://wordpress.org/?v=3.3.1 By: SUbhash Yadav http://www.winhelponline.com/blog/how-to-determine-the-last-shutdown-date-and-time-in-windows-xp2003vista/comment-page-1/#comment-16583 SUbhash Yadav Sat, 17 Sep 2011 07:44:18 +0000 http://www.winhelponline.com/blog/?p=570#comment-16583 strValueName = "HKLM\SYSTEM\CurrentControlSet\Control\Windows\" _ & "ShutdownTime" Set oShell = CreateObject("WScript.Shell") Ar = oShell.RegRead(strValueName) Term = Ar(7)*(2^56) + Ar(6)*(2^48) + Ar(5)*(2^40) + Ar(4)*(2^32) _ + Ar(3)*(2^24) + Ar(2)*(2^16) + Ar(1)*(2^8) + Ar(0) Days = Term/(1E7*86400) WScript.Echo "ShutdownTime = " & CDate(DateSerial(1601, 1, 1) + Days) _ & " UTC" Nte:-This script not given the right shutdown time. strValueName = “HKLM\SYSTEM\CurrentControlSet\Control\Windows\” _
& “ShutdownTime”
Set oShell = CreateObject(“WScript.Shell”)
Ar = oShell.RegRead(strValueName)
Term = Ar(7)*(2^56) + Ar(6)*(2^48) + Ar(5)*(2^40) + Ar(4)*(2^32) _
+ Ar(3)*(2^24) + Ar(2)*(2^16) + Ar(1)*(2^8) + Ar(0)
Days = Term/(1E7*86400)
WScript.Echo “ShutdownTime = ” & CDate(DateSerial(1601, 1, 1) + Days) _
& ” UTC”

Nte:-This script not given the right shutdown time.

]]>