FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Saber el UTC en FWH y xHarbour
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Saber el UTC en FWH y xHarbour
Posted: Wed Aug 27, 2014 08:01 PM
Buenas, como hacer para saber el UTC como en el ejemplo, suando FiveWin for xHarbour?

Code (fw): Select all Collapse
/* Copyright 2013 Viktor Szakats (vszakats.net/harbour) */

#require "hbmisc"

PROCEDURE Main()

 LOCAL tTime

 Set( _SET_DATEFORMAT, "yyyy-mm-dd" )

 ?? "UTC  time:", tTime := hb_ntp_GetTimeUTC( "0.europe.pool.ntp.org" )
 ?
 ?? "Local time:", tTime + hb_UTCOffset() / 86400
 ?
 ?? "System time:", hb_DateTime()
 ?

 RETURN


Gracias, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion