=(nu)

[VenA]

De functie =(nu) bestaat niet. En wie gaat er nu met de systeemtijd lopen knoeien?

 

[alphamax]

Met een API die de tijd van http://worldclockapi.com haalt.

[SIZE=1]Option Explicit

Public Function currentDateTime()
    Dim strResponseText As String
    With CreateObject("msxml2.xmlhttp")
        .Open "get", "http://worldclockapi.com/api/json/cet/now", False 'cet = central european time
        .Send
        strResponseText = .responsetext
        With CreateObject("scriptcontrol")
            .Language = "jscript"
            currentDateTime = CDate(Replace(Left(.Eval("(" + strResponseText + ").currentDateTime"), 16), "T", " ")) 'am_2018
        End With
    End With
End Function[/SIZE]

Mogelijke tijdzones:

Abbreviation Worldclockapi	Abbreviation Worldtimezone	timeZoneName	utcOffset	isDayLightSavingsTime
AST		Atlantic Standard Time	UTC-3	TRUE
AZOST	AT/AZOT	Azores Standard Time	UTC±0	TRUE
AZST	AZT	Azerbaijan Standard Time	UTC+4	FALSE
CET		Central Europe Standard Time	UTC+2	TRUE
CHST	CCT	China Standard Time	UTC+8	FALSE
CST		Central Standard Time	UTC-5	TRUE
DST	IDLW	Dateline Standard Time	UTC-12	FALSE
EEST	EET	East Europe Standard Time	UTC+3	TRUE
EGST	CAT	Egypt Standard Time	UTC+2	FALSE
EST		Eastern Standard Time	UTC-4	TRUE
FST	FJT	Fiji Standard Time	UTC+12	FALSE
GEST	GET	Georgian Standard Time	UTC+4	FALSE
GMT		GMT Standard Time	UTC+1	TRUE
GST	GMT	Greenwich Standard Time	UTC±0	FALSE
HAST		Hawaiian Standard Time	UTC-10	FALSE
IRST	IRT	Iran Standard Time	UTC+3:30	FALSE
KOST	KST	Korea Standard Time	UTC+9	FALSE
MAGST	MAGT	Magadan Standard Time	UTC+11	FALSE
MEST	EET	Middle East Standard Time	UTC+3	TRUE
MST		Mountain Standard Time	UTC-6	TRUE
NST		Newfoundland Standard Time	UTC-2:30	TRUE
NZST		New Zealand Standard Time	UTC+13	TRUE
PST		Pacific Standard Time	UTC-7	TRUE
UTC		UTC	UTC±0	FALSE

of

http://worldclockapi.com/Api/TimeZone, voor timezones

voorbeeld

http://worldclockapi.com/api/json/W. Europe Standard Time/now

 

[Depant]

Hallo allemaal,

Ik wil jullie nog bedanken voor jullie hulp, maar heb voor de makkelijkste weg gekozen.
Ik heb IT de "adminstrator" rechten er af laten halen.

Werkt super nu!!:thumb: