Shareittips.com

Computer & IT Tips By Akash Padhiyar

To run the script, copy the following lines to a Notepad document, and save as a file with .VBS extension (use double-quotes) and double-click the file. The installation date and time would be displayed.


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


Akash Padhiyar

I am Akash Padhiyar Founder of Shareittips.com,BCA MCA Tutor ,Running Web development compnay "AkashInfoTech".

More Posts - Website - Facebook

Share
Categories: Windows-XP

Leave a Reply


Google Search

Popular Posts

Web Designer vs Web

This Infographic explain you what is role of Web Designer and ...

Download Bluestack Offline

Download BlueStack O

Download BlueStack Offline  BlueStack is software in which you can run ...

FireCMD user interface

Command Prompt (cmd.

Serious geeks spend a lot of time at the command ...

Sponsors