Code-Beispiel

UNIX-Timestamp

Lizenz:	Erster Autor:	Letzte Bearbeitung:
LGPL	Volta	12.12.2007

Der UNIX-Timestamp ist eine Datums- / Zeitangabe (als UIntegerwert) in Sekunden, die seit dem 01.01.1970 vergangen sind.
In FreeBasic wird ein anderes Format (Double) benutzt, aber es lässt sich leicht konvertieren.

#Include Once "vbcompat.bi"

Dim As integer a



Screen 18.32

?"MEZ: ";Date, Time



'Umrechnungsfaktor Tage in Sekunden 24h * 60min * 60sec = 86400

'DateSerial(1970,1,1) = 25569

a = ((Now - 25569) * 86400)

?"MEZ Timestamp: ";a

PRINT FORMAT((a / 86400) + 25569, "dd.mm.yyyy, hh:mm:ss")

?



#Include Once "crt.bi"

time_ @a

?"UTC Timestamp: ";a

PRINT FORMAT((a / 86400) + 25569, "dd.mm.yyyy, hh:mm:ss")



sleep

Zusätzliche Informationen und Funktionen

Das Code-Beispiel wurde am 11.12.2007 von Volta angelegt.
Die aktuellste Version wurde am 12.12.2007 von Volta gespeichert.

Bearbeiten

Versionen

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.