Lotus. Zonder poeha

Nederlandstalig weblog over IBM Lotus Notes en Domino.

De laatste weblog entries

Nog een zoon
2289 dagen geleden

Zoek de verschillen
2470 dagen geleden

We've got him
2496 dagen geleden

Customer Panel. Zo kan het ook gaan.
2497 dagen geleden

Get Social, Do Squash!
2498 dagen geleden

Nieuw Nederlands Lotus weblog
2498 dagen geleden

Twitter

Geweldige song: Vader – Impure t.co/hEZpPefn
2070 dagen geleden

@alexdepalex wtf doe je bij de mac als je ook een overheerlijke festival burger met gebakken uitjes kan eten?
2115 dagen geleden

@thimo (...) en?
2130 dagen geleden

@alexdepalex ja ik heb er een gewonnen man!
2132 dagen geleden

@alexdepalex en, is het goedgekomen? t.co/zVE8CqT7
2132 dagen geleden

Volg mij op twitter:
twitter.com/zonderpoeha

Elders

Extend IBM Connections with XPages in less than 100 Seconds
1665 dagen geleden via OpenNTF Blog

OpenNTF Domino API Webinar Sample snippets
1666 dagen geleden via XSnippets

Patterns in achieving social business success
1666 dagen geleden via IdoNotes (and sleep)

Social Connections V ��� or the story of a STRESSful city
1666 dagen geleden via (Social) Business as usual...

The Era of Cognitive Computing
1666 dagen geleden via Irving Wladawsky-Berger

Search engine optimization (SEO)
1666 dagen geleden via Lotushints

Directory Change Analyzer
1666 dagen geleden via OpenNTF Blog

New Video Series: Extend and access IBM Connections and less than 100 Seconds
1666 dagen geleden via OpenNTF Blog

MAMIL gone mad
1667 dagen geleden via wissel.net

First Notes app to .NET MVC
1667 dagen geleden via BleedYellow Blogs

Simple XPage to test mail routing
1667 dagen geleden via XSnippets

British Grand Prix: Lewis Hamilton's chances at Silverstone disappear after ... - Metro
1667 dagen geleden via ibm lotus - Google News

Lotusscript snippet: Javascript timestamp naar een lotusscript date time waarde

woensdag, 14 juli 2010 door Martin Schaefer

Tijdens een project waar we in Google Maps de tijd en lokatie van bepaalde items projecteren kwam ik even vast te zitten. Het ging om het omzetten van een Javascript timestamp naar een Lotusscript variabele. 

Enkele uitgangspunten:

  • Javascript timestamps worden geteld in seconden sinds 1 januari 1970.
  • Lotusscript timestamps worden geteld in seconden sinds 31 december 1899
  • De timestamps zijn altijd in de GMT tijdzone

Tijdens mijn zoektocht kon ik nergens een goed voorbeeld script vinden, daarom plaats ik de functie hier. Voor de meeste mensen waarschijnlijk gesneden koek, maar ik was er toch langer mee bezig dan gedacht. Niet vreemd met Nederland - Spanje op de achtergrond op de radio.

De code performance puristen onder ons zullen de Datenumber (1970,1,1) nog willen vervangen door een constante. Be my guest.


Function JSTimeStampToLSDateTime ( dblJSEpochValue_IN As Double ) As Variant
Const SECONDS_PER_DAY = 86400

Dim dblSecondsSinceEpoch As Double
Dim dtGMTDateTime As Variant
Dim intAddZoneHours As Integer
Dim ndt As NotesDateTime

dblSecondsSinceEpoch = dblJSEpochValue_IN + ( Cdbl( Datenumber(1970,1,1) ) * SECONDS_PER_DAY ) ' 86400 is het aantal seconden in een dag
dtGMTDateTime = Cdat( dblSecondsSinceEpoch / SECONDS_PER_DAY ) ' en weer terug rekenen naar LS/VB

Set ndt = New NotesDateTime ( dtGMTDateTime )
intAddZoneHours = -Val( ndt.TimeZone ) + Abs( ndt.IsDST) ' met -Val zorgen we er voor dat -2 wordt 2 en 2 wordt -2, Abs van een boolean = 1 of 0
Call ndt.AdjustHour ( intAddZoneHours ) ' verplaats de datum/tijd naar de juiste tijdzone inclusief zomertijd

JSTimeStampToLSDateTime = ndt.Lslocaltime
End Function
This LotusScript was converted to HTML using the ls2html routine,
provided by Julian Robichaux at nsftools.com.