Where Customization Begins 

  • Operating System install date with VBS script

 #25999  by Neuropass
 20 Mar 2013, 01:37
paste this on a text file rename it .vbs and run it.


Code: Select all'Returns the Operating System installation date.
strComputer = "."
Set dtmInstallDate = CreateObject( _
  "WbemScripting.SWbemDateTime")
Set objWMIService = GetObject("winmgmts:" _
  & "{impersonationLevel=impersonate}!\\" _
  & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
  ("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
  MsgBox "Install Date: " & getmydat (objOperatingSystem.InstallDate)
Next

Function getmydat(wmitime)
  dtmInstallDate.Value = wmitime
  getmydat = dtmInstallDate.GetVarDate
End function
 #27728  by TheAslan
 29 Aug 2013, 15:55
You can get Windows installation date via CMD window too, open CMD then type this:

Code: Select allcmd /k systeminfo | find "Original Install Date"


Image

Or you can type this:

Code: Select allsysteminfo


Image

TIP: You can also paste one of those commands to Notepad, and save it as .bat file, then just double click it and it will open CMD window.