Tempo Unix e problema dell'anno 2038

[Gianluigi]

Da nessuna parte, ho sparato una c....a estemporanea, ultimamente mi succede un po troppo spesso, colpa della primavera... sommata alle precedenti 

Circa il problema della differenza in effetti sono 4 ore mentre dovrebbero essere due (in più fra noi e UTC essendo in vigore l'ora legale) per me è un bug che invece di di sommare sottrae o viceversa.
A mio parere occorrerebbe chiedere a Minisini chiarimenti su questo e anche su Print che dovrebbe localizzare...
Comunque con le date e gli orari c'è da perdersi, per me è come algebra 

 

[Gianluigi]

Ho fatto una specie di prova del nove e ora mancano le due ore canoniche 

Codice: [Seleziona]

Public Sub Main()

  Dim i, u, r As Float

  i = 60 * 60 * 24 ' ottengo gli ms di un giorno
  u = CFloat(Date.ToUnixTime(Now)) ' ottengo gli ms da epoca
  r = u / i 
  r = Frac(r) ' ottengo la rimanenza odierna
  Print Time(r) ' la tramuto in tempo, e se aggiungessimo 2 ore...

End

... Scusate avevo saltato un passaggio...

 

[kicco]

Affinché i due risultati siano identici, devo aggiungere 4 ore alla data/orario...

Confermo!
 

[Gianluigi]

Affinché i due risultati siano identici, devo aggiungere 4 ore alla data/orario...

Confermo!
 

Infatti, se facciamo "la prova del nove" :

Codice: [Seleziona]

Public Sub Main()

  Dim i, u, r As Float

  i = 60 * 60 * 24 ' ottengo gli ms di un giorno
  u = CFloat(DateDiff("01/01/1970", Now, gb.Second)) ' ottengo (dovrei ottenere) gli ms da epoca
  r = u / i
  Print Int(r) ' ottengo i giorni per curiosità :-)
  r = Frac(r) ' ottengo la rimanenza odierna
  Print Time(r) ' la tramuto in tempo, e se sottraggo 4 ore ottengo UTC (- 2 il tempo locale) MISTERO

End

Otteniamo le 4 ore in più sul tempo UTC

 

[vuott]

A mio parere occorrerebbe chiedere a Minisini chiarimenti su questo

...forse la risposta al nostro problema è stata già data da S.Agostino, quando sul tempo lui afferma:

" Se nessuno me lo chiede, lo so; se cerco di spiegarlo a chi me lo chiede, non lo so. "     

[Gianluigi]

L'errore sembra risolto con l'ultimo commit ora le funzioni qui riportate restituiscono il tempo UTC corretto.

 

[vuott]

L'errore sembra risolto con l'ultimo commit

Ah !?