Buchempfehlung
Windows System Programming
Windows System Programming
Das Kompendium liefert viele interessante Informationen zur Windows-Programmierung auf Englisch. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

Code-Beispiel

Code-Beispiele » System

Windows-Uptime ermitteln

Lizenz:Erster Autor:Letzte Bearbeitung:
k. A.RedakteurMao 09.06.2007

Manchmal ist es ganz interessant, bzw. für Server und/oder Serverprogramme sogar wichtig, zu wissen wie lange der Rechner bereits läuft. Windows stellt dafür eine Funktion zur Verfügung, die die Uptime des Systems in Millisekunden zurückgibt: GetTickCount. Da GetTickCount einen 32-Bit-Integer zurückgibt, errechnet sich daraus, dass es nach etwa 49,7 Tagen einen Overflow gibt, die Uptime also auf 0 zurückgesetzt wird.

#include "windows.bi"

Const Second=1000
Const Minute=Second*60
Const Hour=Minute*60
Const Day=Hour*24

Dim As Unsigned Integer Uptime
Dim As Integer Days, Hours, Minutes, Seconds, Temp

Uptime=GetTickCount

Days=Uptime/Day
Temp=Uptime mod Day
Hours=Temp/Hour
Temp=Temp mod Hour
Minutes=Temp/Minute
Temp=Temp mod Minute
Seconds=Temp/Second

Print "Tage: ", Days
Print "Stunden: ", Hours
Print "Minuten: ", Minutes
Print "Sekunden: ", Seconds

Zusätzliche Informationen und Funktionen
  • Das Code-Beispiel wurde am 09.06.2007 von RedakteurMao angelegt.
  • Die aktuellste Version wurde am 09.06.2007 von RedakteurMao gespeichert.
  Bearbeiten Bearbeiten  

  Versionen Versionen