Remember to maintain security and privacy. Do not share sensitive information. Procedimento.com.br may make mistakes. Verify important information. Termo de Responsabilidade
Script:
Dim objIE, url, interval
' Defina a URL da página que deseja manter ativa
url = "http://www.exemplo.com"
' Defina o intervalo de atualização em milissegundos (60000 ms = 1 minuto)
interval = 60000
' Cria uma instância do Internet Explorer
Set objIE = CreateObject("InternetExplorer.Application")
' Torna o Internet Explorer visível
objIE.Visible = True
' Navega até a URL especificada
objIE.Navigate url
' Aguarda a página carregar completamente
Do While objIE.Busy Or objIE.ReadyState <> 4
WScript.Sleep 100
Loop
' Loop para atualizar a página em intervalos definidos
Do
WScript.Sleep interval
objIE.Refresh
Loop
Como Executar o Script:
1. Abra o Bloco de Notas no Windows.
2. Copie e cole o código acima no Bloco de Notas.
3. Salve o arquivo com a extensão .vbs
, por exemplo, manterPaginaAtiva.vbs
.
4. Localize o arquivo salvo e dê um duplo clique para executá-lo.
5. O Internet Explorer abrirá e manterá a página especificada ativa, atualizando-a no intervalo definido.