Verifique la fecha de instalación del sistema operativo
Publicado: 05 Oct 2014, 13:11
Hola chicos del foro indetectables, como el tema de AutoIt es muy quieto decidieron dejar un script sencillo, pero tal vez un día te necesitan.
$oWMI = ObjGet("winmgmts:\\.\root\CIMV2")
MsgBox(4096, "mensaje", 'El sistema operativo fue installado ' & _getLastInstallDate())
Func _getLastInstallDate()
$oItem = $oWMI.ExecQuery("SELECT * FROM Win32_OperatingSystem")
For $objItem In $oItem
$ano = StringMid($objItem.InstallDate, 1, 4)
$mes = StringMid($objItem.InstallDate, 5, 2)
$dia = StringMid($objItem.InstallDate, 7, 2)
$hora = StringMid($objItem.InstallDate, 9, 2)
$min = StringMid($objItem.InstallDate, 11, 2)
Next
Return $dia & "/" & $mes & "/" & $ano & " as " & $hora & ":" & $min
EndFunc
Nota: punto por punto, porque así es como microsoft recomienda.