VBS Refresh del Browser


Se avete la necessità di aggiornare la pagina del vostro browser per impedire che vi scada un sessione precedentemente avviata, questo è lo script che fa per voi.
Un semplice VBS Script che vi permette di aggiornare la pagina del vostro browser.
E' possibile scegliere tra 3 tipi di browser , impostare il tempo in cui lo script deve rimanere attivo e l'intervallo tra un refresh e l'altro della pagina del browser.





'-----------------------------------------------------------------
'   IMPOSTA IL TIPO DI BROWSER CHE UTILIZZI
'-----------------------------------------------------------------
'Tipo_Browser = "Firefox"

Tipo_Browser = "Internet Explorer"
'Tipo_Browser = "Chrome"

'-----------------------------------------------------------------
'   IMPOSTA LA DURATA DI ESECUZIONE DELLO SCRIPT
'-----------------------------------------------------------------
'tempo di esecuzione dello script
' Tempo espresso in ORE

ORE_esecuzione_script = 20


'-----------------------------------------------------------------
'   IMPOSTA IL TEMPO DI AGGIORNAMENTO DELLA PAGINA DEL BROWSER
'-----------------------------------------------------------------

' tempo di aggiornamento della pagina del browser
'minuti_stanby = 0.10 '(10 secondi)

minuti_stanby = 1


' imposto il tempo massimo di esecuzione dello script
Max_script_Execution = DateAdd("h", ORE_esecuzione_script, now())

' tempo di standby in millisecondi
tempo_standby = minuti_stanby * 60000

' creo l'oggetto di interazione con il sistema
Set WshShell = WScript.CreateObject("WScript.Shell")

while now() < Max_script_Execution

    ' attivo la finestra del browser
    WshShell.AppActivate(Tipo_Browser)

    ' invio il comando F5 di Refresh della pagina
    WshShell.SendKeys "{F5}"

    'script in standby
    WScript.Sleep(tempo_standby)
Wend

WScript.quit

Commenti