Bir bilgisayarın açılma sayısını sayabilen iki kısa komut dosyası yazdım.
Ne yazık ki, özellikle Windows başlatıldığında ve kapatıldığında, özellikle yeniden başlatmalar için bir olay günlüğü yoktur.
Bu komut dosyası event 12
, Windows başlatıldığında günlüğe kaydedilen olay günlüğünü arar . Daha sonra size kaç kez sayıldığını söyler.
VBS Komut Dosyası: Bilgisayarın kaç kez açıldığını sayın
count = 0
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
("Select * from Win32_NTLogEvent Where Logfile = 'System'" _
& " and EventCode = '12'")
For Each objEvent in colLoggedEvents
count = count + 1
Next
wscript.echo "Number of times operating system has started: " & count
VBS Komut Dosyası: Bilgisayarın kaç kez açıldığını uzaktan sayın:
count = 0
strComputer=InputBox ("Enter the network name for the remote computer")
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
("Select * from Win32_NTLogEvent Where Logfile = 'System'" _
& " and EventCode = '12'")
For Each objEvent in colLoggedEvents
count = count + 1
Next
wscript.echo "Number of times operating system has started: " & count
Kaynak VBS Komut Dosyası - Sayım Bilgisayarın açılma sayısı