-
GAMEPOD.hu
Ajánlott ingyenes Windows programok
Androidos kérdéssel irány az Android alkalmazások topik!
Új hozzászólás Aktív témák
-
MODERÁTOR
válasz csikosdapro #8353 üzenetére
pl: uptime
Az első hozzászólásban levő scriptet kimented vbs kiterjesztésű text fájlba és voilá. Vagy ha elég az, hogy mikor jelentkeztél be, akkor CTRL+ALT+DEL és ott látod.
Egyszerűbb script, de csak órában jelzi ki:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")
For Each objOS in colOperatingSystems
dtmBootup = objOS.LastBootUpTime
dtmLastBootupTime = WMIDateStringToDate(dtmBootup)
dtmSystemUptime = DateDiff("h", dtmLastBootUpTime, Now)
Wscript.Echo dtmSystemUptime
Next
Function WMIDateStringToDate(dtmBootup)
WMIDateStringToDate = CDate(Mid(dtmBootup, 5, 2) & "/" & _
Mid(dtmBootup, 7, 2) & "/" & Left(dtmBootup, 4) _
& " " & Mid (dtmBootup, 9, 2) & ":" & _
Mid(dtmBootup, 11, 2) & ":" & Mid(dtmBootup, _
13, 2))
End FunctionJa, és használd a google-t, ne légy lusta. Az adatforgalom számlálót meghagyom neked.
[ Szerkesztve ]
***
Új hozzászólás Aktív témák
- HiFi műszaki szemmel - sztereó hangrendszerek
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Milyen notebookot vegyek?
- Androidos fejegységek
- Székesfehérvár és környéke adok-veszek-beszélgetek
- OLED TV topic
- Politika
- antikomcsi: Való Világ: A piszkos 12 - VV12 - Való Világ 12
- Mibe tegyem a megtakarításaimat?
- Elemlámpa, zseblámpa
- További aktív témák...
- Steam kulcsok - UTALÁS/REVOLUT
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Autómatricák a legjobb minőségben, több ezer minta! PH tagoknak 30% kedvezmény!
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs