Code : Tout sélectionner
HotKeySet("^!x", "MyExit")
Func MyExit()
Exit
EndFunc
sleep(1500)
While 1
Send ("{F5}")
Sleep (70)
WEnd
Code : Tout sélectionner
HotKeySet("^!x", "MyExit")
Func MyExit()
Exit
EndFunc
sleep(1500)
While 1
Send ("{F5}")
Sleep (70)
WEnd
Code : Tout sélectionner
#include <GUIConstants.au3>
#include <IE.au3>
Opt("GUIOnEventMode", 1) ; Mode OnEvent
_IEErrorHandlerRegister ()
$Largeur = 800
$Hauteur = 700
$Pause = 800 ; Temps en millisecondes.
$oIE = _IECreateEmbedded ()
GUICreate("Page Web ...",$Largeur , $Hauteur, -1, -1 )
GUISetOnEvent($GUI_EVENT_CLOSE, "Terminer")
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, $Largeur-20, $Hauteur-50)
GUISetState()
While 1
_IENavigate ($oIE, "http://www.google.fr")
Sleep($Pause)
WEnd
Func Terminer()
GUIDelete()
Exit
EndFunc
Code : Tout sélectionner
While 1
_IENavigate ($oIE, "http://www.kyksy.com/site/promotion.php?pseudo=kusarigama",0)
Sleep($Pause)
WEnd