MantenerDominiosTk.au3 mantener "vivos" dominios tk

[BasicOs]

Esto vale para el típico tópico "KeepAlive" de algunas conexiones a páginas que cierran sesión si no se usa, por ejemplo.
Este script no está probado y es un programa ejemplo de como funcionarían este tipo de situaciones, es posible que no funcione o bien que no cumpla las necesidades de quien lo use.
Esto es solamente un ejemplo de programación experimental en Autoit, no es para solucionar problemas de un usuario en particular, usar bajo propia responsibilidad, ya que no se garantizan los resultados deseados.
Cuando alguien registra un dominio tk, tiene que tenerlo abriendolo con unas visitas mínimas al mes.
Este script que se queda en memoria al arrancar el pc (copiar en inicio), arranca la página en modo invisible.
MantenerDominiosTk.au3

Código: Seleccionar todo

;Esto es solamente un ejemplo de programación experimental en Autoit, no usar en entornos de producción 
;Basicos autoit.es
#include <IE.au3>
$paginaWeb="http://www.autoitscript.tk"
$Visible=0
While 1
for $i=1 to 
	$oIE = _IECreate($paginaWeb, 0, $Visible)
	_IEQuit($oIE)
next
	Sleep(3600 * 24 * 1000) ;24 horas (3600 segundos la hora), una vez al dia si no arrancamos
WEnd

Feliz tk
Ahora podeis acceder al foro escribiendo también http://www.autoitscript.tk



Igual para varios dominios separados por comas:

Código: Seleccionar todo

;Esto es solamente un ejemplo de programación experimental en Autoit, no usar en entornos de producción
; Basicos autoit.es
#include <file.au3>
#include <IE.au3>
$paginaWeb="http://www.autoitscript.tk,http://www.otrawebtk.tk"
$aPaginaWeb=StringSplit($paginaWeb,",")
$Visible=0
While 1
   for $i=1 to $aPaginaWeb[0]
	$oIE = _IECreate($aPaginaWeb[$i], 0, $Visible)
        _FileWriteLog("c:\Windows\MantenerTk.log.txt","Abrí la página" & $aPaginaWeb[$i])
        sleep(2000) ; espera dos segundos para que no sea tan rápido el acceso a la webtk y sea como un usuario real.
	_IEQuit($oIE)      
   next
      $SegundosenUndia=3600*24
	Sleep($SegundosenUndia*1000); 24 horas (3600 segundos la hora), una vez al dia si no arrancamos, sleep trabaja con milesimas de segundo
WEnd

Si no deseas compilarlo puedes hacer un fichero Mantenertk.bat con el contenido en texto del fichero Mantenertk.au3:

Código: Seleccionar todo

c:\micarpeta\Autoit3.exe c:\micarpeta\Mantenertk.au3

y luego haces un link en el inicio
Salu22:)
PD:Revisar condiciones de la licencia para ver si permite aperturas puntuales de este tipo.