TKSoft-Online

Problemstellung:

Umrechnung von UNIX-Timestamp nach Datum und Zeit und umgekehrt.

Voraussetzungen:

Das Bsp ist unter A00-A07 lauffähig.

1. Errechnen einer Datum- und Zeitangabe aus einem UNIX-Timestamp:

Public Function GetDateTime_UNIX(ByVal dblSec As Double) As Variant
    Dim vResult As Variant
    Dim vStart As Variant

    On Error Resume Next

    vStart = DateSerial(1970, 1, 1)

    vResult = DateAdd("s", dblSec, vStart)

    GetDateTime_UNIX = vResult
    On Error GoTo 0
End Function

2. Errechnen des UNIX-Timestamps aus einer Datum- und Zeitangabe.
     (Wahlweise als GMT-Zeit oder lokaler Zeit)

Public Function GetUnixTime_DATETIME(Optional TM_TYP As TimeType = GMT_TIME) As Long
    Dim nResult As Long
    nResult = DateDiff("s", CDate("01.01.1970 00:00:00"), Now)

    Dim lngDiff As Long
    Dim st As SYSTEMTIME

    If TM_TYP = GMT_TIME Then
        GetSystemTime st
        lngDiff = DateDiff("s", DateSerial(st.wYear, st.wMonth, st.wDay) + _
            TimeSerial(st.wHour, st.wMinute, st.wSecond), Now)
        nResult = nResult - lngDiff
    Else
        nResult = nResult
    End If

    GetUnixTime_DATETIME = nResult
End Function

Wie die Aufrufe erfolgen s. Bsp-DB.

Ergebnis:

Umrechnung von UNIX-Timestamp nach Datum und Zeit und umgekehrt

Downloads in dieser Kategorie

MS-Access Datum und Zeit

Seite: 1

• Berechnen von bestimmten Datumswerten

Berechnen von bestimmten Datumswerten
für A00-A03 , A07 nicht getestet

Die Zip-Datei enthält eine Version ab A00

• Berechnen von Zeiträumen als Abfragekriterium

Berechnen von Zeiträumen als Abfragekriterium
für A97-A03 , A07 nicht getestet

Die Zip-Datei enthält ein Version für A97 und eine ab A00

• Ermitteln von frei definierbaren Zeitanteilen aus frei definierbaren Zeiträumen

Ermitteln von frei definierbaren Zeitanteilen aus frei definierbaren Zeiträumen
für A00-A07

Die Zip-Datei enthält eine Version ab A00

Update 04.03.2009:

Einige Berechnungsfehler korrigiert.
Es sind jetzt Angaben für einen 24 Stundenzeitraum möglich
z.B. 04:00 - 04:00

Update 21.02.2010:

Einige Berechnungsfehler korrigiert.
• Rechnen mit Zeiten (auch negative)
Rechnen mit Zeiten (auch negative)
für A00-A07

Die Zip-Datei enthält ein Version ab A00
• Runden von Uhrzeiten

Runden von Uhrzeiten
für A97-A03 , A07 nicht getestet

Die Zip-Datei enthält ein Version für A97 und eine ab A00

• Umrechnung von UNIX-Timestamp nach Datum und Zeit und umgekehrt
Umrechnung von UNIX-Timestamp nach Datum und Zeit und umgekehrt
für A00-A07

Die Zip-Datei enthält ein Version ab A00

Powered by Tux Merlín Extensions