Code : Tout sélectionner
#NoTrayIcon
HotKeySet("{F2}","My_Exit")
While 1
MouseClick("left",848, 826, 1)
#include <array.au3>
#include <File.au3>
Global Const $TAILLE_FICHIER_1 = 12313029
Global $f = detecteNouveauChargement()
detecteFinChargement($f, $TAILLE_FICHIER_1)
MouseClick("left", 734, 824, 1)
sleep(5000)
MouseClick("left", 361, 393, 1)
sleep(5000)
MouseClick("left", 847, 826, 1)
sleep(5000)
MouseClick("left", 531, 826, 1)
Func detecteNouveauChargement()
Local $i, $fFlaTmp
Local $dateCreation, $dateFichier, $dateActuelle
$dateActuelle = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC
While 1
$fFlaTmp = _FileListToArray(@TempDir, "fla*.tmp", 1)
;~ _ArrayDisplay($fFlaTmp)
If Not @error Then
For $i = 1 To $fFlaTmp[0]
$dateCreation = FileGetTime(@TempDir & "\" & $fFlaTmp[$i], _
1, _ ; date création
1) ; format YYYYMMDDHHMMSS
; si un nouveau fichier fla*.tmp a été créé alors on sort des boucles
If $dateCreation > $dateActuelle Then ExitLoop 2
Next
EndIf
Sleep(250)
WEnd
Return $fFlaTmp[$i]
EndFunc ;==>detecteNouveauChargement
Func detecteFinChargement($nomFichier, $tailleFichier)
Do
Sleep(250)
Until FileGetSize(@TempDir & "\" & $nomFichier) = $TAILLE_FICHIER_1
EndFunc ;==>detecteFinChargement
#include <array.au3>
#include <File.au3>
Global Const $TAILLE_FICHIER_2 = 38457549
Global $f = detecteNouveauChargement2()
detecteFinChargement2($f, $TAILLE_FICHIER_2)
MouseClick("left", 734, 824, 1)
sleep(5000)
MouseClick("left", 358, 410, 1)
sleep(5000)
MouseClick("left", 848, 858, 1)
sleep(5000)
MouseClick("left", 531, 857, 1)
Func detecteNouveauChargement2()
Local $i, $fFlaTmp
Local $dateCreation, $dateFichier, $dateActuelle
$dateActuelle = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC
While 1
$fFlaTmp = _FileListToArray(@TempDir, "fla*.tmp", 1)
;~ _ArrayDisplay($fFlaTmp)
If Not @error Then
For $i = 1 To $fFlaTmp[0]
$dateCreation = FileGetTime(@TempDir & "\" & $fFlaTmp[$i], _
1, _ ; date création
1) ; format YYYYMMDDHHMMSS
; si un nouveau fichier fla*.tmp a été créé alors on sort des boucles
If $dateCreation > $dateActuelle Then ExitLoop 2
Next
EndIf
Sleep(250)
WEnd
Return $fFlaTmp[$i]
EndFunc ;==>detecteNouveauChargement
Func detecteFinChargement2($nomFichier, $tailleFichier)
Do
Sleep(250)
Until FileGetSize(@TempDir & "\" & $nomFichier) = $TAILLE_FICHIER_2
EndFunc ;==>detecteFinChargement
#include <array.au3>
#include <File.au3>
Global Const $TAILLE_FICHIER_3 = 6758656
Global $f = detecteNouveauChargement3()
detecteFinChargement3($f, $TAILLE_FICHIER_3)
MouseClick("left", 739, 857, 1)
sleep(5000)
MouseClick("left", 356, 426, 1)
sleep(5000)
MouseClick("left", 847, 825, 1)
sleep(5000)
MouseClick("left", 530, 824, 1)
Func detecteNouveauChargement3()
Local $i, $fFlaTmp
Local $dateCreation, $dateFichier, $dateActuelle
$dateActuelle = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC
While 1
$fFlaTmp = _FileListToArray(@TempDir, "fla*.tmp", 1)
;~ _ArrayDisplay($fFlaTmp)
If Not @error Then
For $i = 1 To $fFlaTmp[0]
$dateCreation = FileGetTime(@TempDir & "\" & $fFlaTmp[$i], _
1, _ ; date création
1) ; format YYYYMMDDHHMMSS
; si un nouveau fichier fla*.tmp a été créé alors on sort des boucles
If $dateCreation > $dateActuelle Then ExitLoop 2
Next
EndIf
Sleep(250)
WEnd
Return $fFlaTmp[$i]
EndFunc ;==>detecteNouveauChargement
Func detecteFinChargement3($nomFichier, $tailleFichier)
Do
Sleep(250)
Until FileGetSize(@TempDir & "\" & $nomFichier) = $TAILLE_FICHIER_3
EndFunc ;==>detecteFinChargement
#include <array.au3>
#include <File.au3>
Global Const $TAILLE_FICHIER_4 = 25025090
Global $f = detecteNouveauChargement4()
detecteFinChargement4($f, $TAILLE_FICHIER_4)
MouseClick("left", 734, 824, 1)
sleep(5000)
MouseClick("left", 352, 440, 1)
sleep(5000)
MouseClick("left", 847, 825, 1)
sleep(5000)
MouseClick("left", 530, 824, 1)
Func detecteNouveauChargement4()
Local $i, $fFlaTmp
Local $dateCreation, $dateFichier, $dateActuelle
$dateActuelle = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC
While 1
$fFlaTmp = _FileListToArray(@TempDir, "fla*.tmp", 1)
;~ _ArrayDisplay($fFlaTmp)
If Not @error Then
For $i = 1 To $fFlaTmp[0]
$dateCreation = FileGetTime(@TempDir & "\" & $fFlaTmp[$i], _
1, _ ; date création
1) ; format YYYYMMDDHHMMSS
; si un nouveau fichier fla*.tmp a été créé alors on sort des boucles
If $dateCreation > $dateActuelle Then ExitLoop 2
Next
EndIf
Sleep(250)
WEnd
Return $fFlaTmp[$i]
EndFunc ;==>detecteNouveauChargement
Func detecteFinChargement4($nomFichier, $tailleFichier)
Do
Sleep(250)
Until FileGetSize(@TempDir & "\" & $nomFichier) = $TAILLE_FICHIER_4
EndFunc ;==>detecteFinChargement
#include <array.au3>
#include <File.au3>
Global Const $TAILLE_FICHIER_5 = 12313029
Global $f = detecteNouveauChargement5()
detecteFinChargement5($f, $TAILLE_FICHIER_5)
MouseClick("left", 734, 824, 1)
sleep(5000)
WinClose("[REGEXPTITLE:Mozilla Firefox]", "") ; Déconnection/Reconnection live box
sleep(5000)
MouseClick("left", 155, 1008, 1)
sleep(5000)
MouseClick("left", 336, 99, 1)
sleep(5000)
MouseClick("left", 939, 256, 1)
sleep(5000)
MouseClick("left", 748, 709, 1)
sleep(15000)
MouseClick("left", 748, 710, 1)
sleep(15000)
WinClose("[REGEXPTITLE:Livebox-950c]", "")
Func detecteNouveauChargement5()
Local $i, $fFlaTmp
Local $dateCreation, $dateFichier, $dateActuelle
$dateActuelle = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC
While 1
$fFlaTmp = _FileListToArray(@TempDir, "fla*.tmp", 1)
;~ _ArrayDisplay($fFlaTmp)
If Not @error Then
For $i = 1 To $fFlaTmp[0]
$dateCreation = FileGetTime(@TempDir & "\" & $fFlaTmp[$i], _
1, _ ; date création
1) ; format YYYYMMDDHHMMSS
; si un nouveau fichier fla*.tmp a été créé alors on sort des boucles
If $dateCreation > $dateActuelle Then ExitLoop 2
Next
EndIf
Sleep(250)
WEnd
Return $fFlaTmp[$i]
EndFunc ;==>detecteNouveauChargement
Func detecteFinChargement5($nomFichier, $tailleFichier)
Do
Sleep(250)
Until FileGetSize(@TempDir & "\" & $nomFichier) = $TAILLE_FICHIER_5
EndFunc ;==>detecteFinChargement
WEnd ; Fin de la boucle général
Func My_Exit() ; Fin de la fonction de fermetur du script
Exit 0
EndFunc