Página 1 de 1

Leer paginas web abiertas

Publicado: 28 Oct 2014, 03:40
por wbueso
Doy clases basicas de computacion y algunos alumnos se me distraen abriendo Facebook mientras estoy dando clases, y quiero hacer un script en autoit que detecte cuando habren la pagina de facebook o Youtube para que les muestre un mensage y asi no tenga que estar pendiente de ellos, lo que no deseo es bloquear el internet pues lo necesito activo y tampoco quiero bloquear en al navegador la pagina de Facebook o Youtube.

Ya estube intentando pero no lo he logrado, podrian ayudarme solo con lo basico (como detectar las paginas del navegador) o algo asi.

Re: Leer paginas web abiertas

Publicado: 28 Oct 2014, 03:50
por Dany
que navegador usan las computadoras?

Re: Leer paginas web abiertas

Publicado: 28 Oct 2014, 04:09
por Dany
Podrías hacer algo así:


Código: Seleccionar todo

Local $sText=""
While True

$sText = WinGetTitle("[ACTIVE]")
If StringInStr($sText,"Facebook") Then MsgBox(64, "", "Deja de joder en FaceBook ¬¬")
If StringInStr($sText,"Youtube") Then  MsgBox(64, "", "Deja de joder en Youtube ¬¬")
Sleep(100)
WEnd

O también podrías bloquearlas en el hosts.

Código: Seleccionar todo

Local $sHost=@SystemDir & "\drivers\etc\hosts"


FileWrite($sHost,"127.0.0.1" & @TAB & "www.youtube.com")
FileWrite($sHost,"127.0.0.1" & @TAB & "www.facebook.com")

Saludos

Re: Leer paginas web abiertas

Publicado: 28 Oct 2014, 07:13
por wbueso
Todas la maquinas usan mozilla firefox, ellos usan la conexion a internet para hacer tareas o para practica, y si todo va bien los dejo navegar en facebook durante 15 minutos, es por eso que no puedo bloquear la pagina, pero si me gustaria un scrip que este vigilando cuando habren el facebook y que que al habrir la pagina de facebook les envie o les muestre un mensaje, gracias por sus respuestas, practicare un poco con sus ideas.

Re: Leer paginas web abiertas

Publicado: 28 Oct 2014, 07:17
por wbueso
Acabo de probar el codigo que me enviaste y funciona bien, gracias eres un genio.