Hi
OR,
' From: https://stackoverflow.com/questions/170617/how-do-i-find-the-install-time-and-date-of-windows
' Needs Imports System.Management
Dim dtmInstallDate As DateTime
Dim oSearcher As New ManagementObjectSearcher("SELECT * FROM Win32_OperatingSystem")
For Each oMgmtObj As ManagementObject In oSearcher.Get
dtmInstallDate = ManagementDateTimeConverter.ToDateTime(CStr(oMgmtObj("InstallDate")))
Next