Buonasera a tutti.
sto creando una piccola applicazione che richiami i dati di un treno a piacimento nella giornata odierna (non si può cercare nei giorni precedenti o successivi).
mi è necessario avere il timestamp della data odierna.
per oggi 9 ottobre il time stamp è 1696802400000 che corrisponde a :
| Format | Milliseconds (1/1,000 second) |
| GMT | Sun Oct 08 2023 22:00:00 GMT+0000 |
| Your Time Zone | Mon Oct 09 2023 00:00:00 GMT+0200 (Ora legale dell’Europa centrale) |
dov'è il problema ? che questo funziona fino al cambio dell'ora solare/legale e viceversa.come posso fare per farlo funzionare anche quanto GMT diventerà +1 al cambio ora solare/legale ?
io ho scritto questo codice :
Dim data As Date = Today.ToUniversalTime
Dim data1 As String = data.ToString("g")
Dim timesceltautente As Double = GetUnixTimestampFromVBdatetime(data1)
che richiama questa funzione :
Public Function GetUnixTimestampFromVBdatetime(ByVal d As DateTime) As Double
Dim ts As TimeSpan = (d - New DateTime(1970, 1, 1, 0, 0, 0, 0))
Return ts.TotalMilliseconds
in un altra parte del programma dovrò confrontare l'orario di fermata (in time stamp) con l'ora corrente quindi avrò lo stesso problema al contrario.
grazie per qualsiasi aiuto