By using the following code gives the resulting log deviation of 1 hour, is a failure or I interpret something wrong. thanks
Log:
Sub Globals
Dim TIMER1 As Timer
End Sub
Sub Activity_Create(FirstTime As Boolean)
TIMER1.Initialize("timer1",1000)
TIMER1.Enabled = True
End Sub
Sub timer1_Tick
Dim t,d As Long
d = DateTime.DateParse(DateTime.Date(DateTime.Now))
t = DateTime.TimeParse(DateTime.Time(DateTime.Now))
Log("-----------------------------")
Log(DateTime.date(DateTime.Now) & "-" & DateTime.Time(DateTime.Now))
Log(DateTime.Date(d) & " - " & DateTime.Time(t))
Log("-----------------------------")
End Sub
Log:
-----------------------------
04/22/2012-14:07:47
04/22/2012 - 15:07:47
-----------------------------