sent_date = m.get("sent_date") 'yyyy-mm-dd hh:mm:ss
servertime = m.get("time") 'yyyy-mm-dd hh:mm:ss
'Parse stored time
Dim minutes, datediff As String
datediff = sent_date.SubString2(0,10) 'Get date only
minutes = sent_date.SubString2(12,19)'Get time only
'Parse server time
Dim serverday As String = servertime.SubString2(0,10)
Dim serverhour As String = servertime.SubString2(12,19)
'Convert
parsedServerTime = DateTime.DateTimeParse(serverday, serverhour)
sent_Datetoticks =DateTime.DateTimeParse(datediff, minutes)'Stored datetime
'#######################
'Dim ticks As Long = DateTime.Now - sent_Datetoticks 'Erel code
'#######################
Dim ticks As Long = parsedServerTime - sent_Datetoticks 'Difference between current server time.
Dim minutes_elapsed As Int = ticks / DateTime.TicksPerMinute
log(minutes_elapsed&"Mins elapsed")