Sidebar refresh after wakeup

Hello,

I wrote a small gadget the pulls a comma seperated list of values over a URL GET and displays them. I have it set to refresh every 60 seconds. However, after the computer comes out from wakeup it doesn't refresh any more. What code can I add to address this?

<script language="VBScript">

Sub Window_Onload
GetData
iTimerID = window.SetInterval("GetData", 60000)
End Sub

Sub GetData
url = "http://xxxxxxx"
set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "GET", url, false
xmlhttp.send ""

DataArray = Split(xmlhttp.responseText, ",", -1, 1)
DataDate.InnerHTML = DataArray(0)
DataMax.InnerHTML = FormatNumber(DataArray(1),0)
DataOrdersHour.InnerHTML = DataArray(2)
DataOrdersToday.InnerHTML = DataArray(3)
DataBilled.InnerHTML = FormatNumber(DataArray(4),0)
End Sub

</script>

[964 byte] By [marcusadolfsson] at [2008-2-13]
# 1
maybe going to sleep is stopping the timer. If that is the case, you should be able to use the System.Gadget.visibilityChanged event to detect when sleep ends, and restart the timer.
BruceWilliams at 2007-9-3 > top of Msdn Tech,Gadgets,Sidebar Gadget Development...
# 2
The timers don't stop after the computer is resumed from Sleep/Hibernation. It more likely you're generating an error due to the NIC not being initialized.

Try putting a try/catch around your code, ie:

Sub GetData
try{
url = "http://xxxxxxx"
set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "GET", url, false
xmlhttp.send ""

DataArray = Split(xmlhttp.responseText, ",", -1, 1)
DataDate.InnerHTML = DataArray(0)
DataMax.InnerHTML = FormatNumber(DataArray(1),0)
DataOrdersHour.InnerHTML = DataArray(2)
DataOrdersToday.InnerHTML = DataArray(3)
DataBilled.InnerHTML = FormatNumber(DataArray(4),0)
} catch(err) {}
End Sub

JonathanAbbott at 2007-9-3 > top of Msdn Tech,Gadgets,Sidebar Gadget Development...