[HELP] How to make a countdown??

[rickrack]

Hello, I'm sorry to bore you with all these questions, but there's one other thing I can't solve by myself...
I would like to make a countdown for AS Roma (italian team) football matches as I did in my website (is it permitted to link it?)..
This is my plan:
1- Get date and time of next match from a txt file on my server (just did it)
2- "Subtract" the now Time and Date from the date I downloaded from the server
3- Show the numbers in the labels (should not be a problem, i'll try by myself this one)

I have problems by making a "dateparse" with my downloaded string... do you have any advise for me?
I'm sorry for some grammar errors you encountered in this text

Thanks in advance,
Riccardo

 

[Erel]

is it permitted to link it?

Yes.

I have problems by making a "dateparse" with my downloaded string... do you have any advise for me?

Please give us an example...

 

[rickrack]

Thank you for reply, Erel

This is the website, you can find the countdown widget just after the articles slider:As Roma Streaming

Now I changed the code and tried other functions so I haven't details about the DataParse problem.

Do you have any ideas for this countdown?

 

[Erel]

I only see two empty boxes.

Which problem did you encounter? How to calculate the remaining hours, minutes? There are several related discussions in the forum (use the search feature in the upper right corner).

 

[rickrack]

I have problems by subtracting the time.. I would like to subtract from the downloaded date years, months, days, hours, minutes and seconds of now and transform them as seconds, so i could "split the time" and assign it to the labels. This is a screenshot of asromastreaming.net countdown: Screenshot
I searched and tried one of the function I found in the forum but just the minutes have been subtracted

 

[Erel]

Subtract DateTime.Now from the parsed date and then use a method such as:

Sub ConvertTicksToTimeString(t As Long) As String
    Dim days, hours, minutes, seconds As Int
    days = t / DateTime.TicksPerDay
    hours = (t Mod DateTime.TicksPerDay) / DateTime.TicksPerHour
    minutes = (t Mod DateTime.TicksPerHour) / DateTime.TicksPerMinute
    seconds = (t Mod DateTime.TicksPerMinute) / DateTime.TicksPerSecond
    Return days & " days, " & NumberFormat(hours, 2, 0) & " hours, " _
        & NumberFormat(minutes, 2, 0) & " minutes and " & NumberFormat(seconds, 2, 0) & " seconds"
End Sub

 

[rickrack]

Thank you, but the problem for me is to subtract datetime.now! I can't find how to do it...

 

[Erel]

Can you post the date string that you receive from the web?

 

[rickrack]

I splitted it in an array by 'day,month,year' and in another one 'hours,minutes'
is it ok?

 

[Erel]

Not really. You should parse the date and time sections.

If you like more help then please post the string.

 

[rickrack]

i download it in this format:
21/10/2012, 20:45

 

[Erel]

What is time zone? It might be different than the device time zone.

 

[Erel]

You can use this code:

Dim dateString As String = "21/10/2012, 20:45"
   Dim date, time As Long
   Dim parts() As String = Regex.Split(", ", dateString)
   DateTime.DateFormat = "dd/MM/yyyy"
   DateTime.TimeFormat = "HH:mm"
   date = DateTime.DateParse(parts(0))
   time = DateTime.TimeParse(parts(1)) - DateTime.DateParse(DateTime.Date(DateTime.Now)) 'Remove the today date component
   Log(ConvertTicksToTimeString(date + time - DateTime.Now))
   
Sub ConvertTicksToTimeString(t As Long) As String
    Dim days, hours, minutes, seconds As Int
    days = t / DateTime.TicksPerDay
    hours = (t Mod DateTime.TicksPerDay) / DateTime.TicksPerHour
    minutes = (t Mod DateTime.TicksPerHour) / DateTime.TicksPerMinute
    seconds = (t Mod DateTime.TicksPerMinute) / DateTime.TicksPerSecond
    Return days & " days, " & NumberFormat(hours, 2, 0) & " hours, " _
        & NumberFormat(minutes, 2, 0) & " minutes and " & NumberFormat(seconds, 2, 0) & " seconds"
End Sub

It assumes that the target time zone is the same as the device time zone.

 

[rickrack]

Thank you, I'll try and inform you about it

 

[rickrack]

It worked fine!! Thank you a lot, Erel )