SpiderBasic

Posted: **Sat Aug 17, 2019 12:31 am**

Hello,

I would like to refresh a web page in a WebGadget every 10 seconds but I can not. This is the code I use but I do not know how to organize it to work.

Thank you in advance for your help.

Code: Select all

Procedure TimerEvents()
    SetGadgetState(1, #PB_Web_Refresh)
    EventTimer()
  EndProcedure
  
  If OpenWindow(0, 0, 0, 295, 260, "Timer example", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)
   
    AddWindowTimer(0, 1, 10000)
      
    BindEvent(#PB_Event_Timer, @TimerEvents())
    WebGadget(0, 10, 10, 580, 280, "http://www.spiderbasic.com")

  EndIf

Posted: **Sat Aug 17, 2019 8:37 am**

If my memory serves me well, the refresh updates on changes only.
To force a refresh, you can simply navigate to a page instead..
Furthermore your webgadget is "0", while you try to refresh a gadget number "1".

Code: Select all

Global CurrentPage.s  = "http://www.spiderbasic.com"
Procedure TimerEvents()
  Debug "refresh"
  SetGadgetText(0, CurrentPage)
EndProcedure

OpenWindow(0, 0, 0, 795, 860, "Timer example", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)

AddWindowTimer(0, 1, 10000)

BindEvent(#PB_Event_Timer, @TimerEvents())
WebGadget(0, 10, 10, 580, 280, CurrentPage)

Posted: **Sat Aug 17, 2019 7:46 pm**

Super thanks a lot for your help.

SpiderBasic

Refresh WebGadget

Refresh WebGadget

Re: Refresh WebGadget

Re: Refresh WebGadget