Convert 8 Digits to Time

[Rustin788]

Hey, We have a timestamp in our system and I've been unsuccessful in converting it to an actual time. This is from 1/1/2023 21462959 and this one is from 1/2/23 15520044. Appreciate any help.




***I knew this was familiar. I asked the same question in 2018. Apologies.

[Minty]

You did - here https://www.accessforums.net/showthr...895#post413895 for any interested parties

[ranman256]

function ParseTime(pvDateTime)
dim vVal, h,n,s

vVal = right(pvDateTime,8)
h = left(vVal,2)
n = mid(vVal,3,2)
s = mid(vVal,5,2)

ParseTime = h & ":" & n & ":" & s
end function