[...] Petit Skin pour mon script
Posté : lun. 31 mai 2010 17:18
par TOMOYO
Bonjour à tous,
Voila ma demande, j'ai réalisé un script regroupant divers logiciels de maintenance, baptisé SoClean, à la demande de mon boss.
Il fonctionne plutôt bien même si j'ai encore quelques debug à faire.
Le soucis c'est que j'ai lu les infos concernant l'attribution de skin à sa GUI et je ne vous cache pas nager complètement.
Ce que je recherche, un skin plutôt simple, pas de fantaisies, du style boutons un peu arrondis, avec par contre la possibilités de modifier l'arrière plan à ma guise. Et éventuellement police/couleur.
Voici mon script :
En contrepartie, si vous désirez une quelconque information dans un langage autre que AutoIt ( et oui j'ss débutant) je reste à votre disposition ( C/C++/JAVA/ADA/B/LabView/HTML/CSS/PHP/SQL/JavaScript )
Cordialement
TOMOYO
Voila ma demande, j'ai réalisé un script regroupant divers logiciels de maintenance, baptisé SoClean, à la demande de mon boss.
Il fonctionne plutôt bien même si j'ai encore quelques debug à faire.
Le soucis c'est que j'ai lu les infos concernant l'attribution de skin à sa GUI et je ne vous cache pas nager complètement.
Ce que je recherche, un skin plutôt simple, pas de fantaisies, du style boutons un peu arrondis, avec par contre la possibilités de modifier l'arrière plan à ma guise. Et éventuellement police/couleur.
Voici mon script :
► Afficher le texte
Code : Tout sélectionner
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.6.0
Auteur: *_*'
Fonction du Script : Utilitaire de Maintenance Informatique
Modèle de Script AutoIt.
#ce ----------------------------------------------------------------------------
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
;-------------------------------------------------------------------------------
;-----------------------------INTERFACE-----------------------------------------
;-------------------------------------------------------------------------------
#Region ### START Koda GUI section ### Form=
Global $Form2 = GUICreate("Interface 1", 720,470, 302, 218)
Global $Tab1 = GUICtrlCreateTab(10, 10, 700, 450)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
Global $TabSheet1 = GUICtrlCreateTabItem(" Maintenance ")
Global $Progress1 = GUICtrlCreateProgress(50, 390, 150, 16)
Global $Label = GUICtrlCreateLabel("Avancement", 50 , 368, 200)
;-------------------------------------------------------------------------------
;-----------------------------ONGLET #1----------------------------------------
;-------------------------------------------------------------------------------
;-------------------------------------------------------------------------------
;-----------------------------PARTIE NETTOYAGE----------------------------------
;-------------------------------------------------------------------------------
Global $Checkbox1 = GUICtrlCreateCheckbox("MAJ Java", 50, 56, 97, 17)
Global $Checkbox2 = GUICtrlCreateCheckbox("CCleaner", 50, 76, 97, 17)
Global $Checkbox3 = GUICtrlCreateCheckbox("Quick clean", 50, 96, 97, 17)
Global $Checkbox4 = GUICtrlCreateCheckbox("KCleaner", 50, 116, 97, 17)
Global $Checkbox5 = GUICtrlCreateCheckbox("GUP", 50, 136, 97, 17)
Global $Checkbox6 = GUICtrlCreateCheckbox("Javara", 50, 156, 97, 17)
Global $Checkbox7 = GUICtrlCreateCheckbox("Wise Disk Cleaner", 50, 176, 105, 17)
Global $Button1 = GUICtrlCreateButton("Nettoyage", 50, 250, 75, 25, $WS_GROUP)
Global $Button7 = GUICtrlCreateButton("Default" , 50 ,210 , 75 , 25, $WS_GROUP)
;-------------------------------------------------------------------------------
;-----------------------------PARTIE SPYWARES-----------------------------------
;-------------------------------------------------------------------------------
Global $Checkbox8 = GUICtrlCreateCheckbox("conficker", 190, 56, 97, 17)
Global $Checkbox9 = GUICtrlCreateCheckbox("RAC", 190, 76, 97, 17)
Global $Checkbox10 = GUICtrlCreateCheckbox("Malwares Bytes", 190, 96, 97, 17)
Global $Checkbox11 = GUICtrlCreateCheckbox("Norman", 190, 116, 97, 17)
Global $Checkbox12 = GUICtrlCreateCheckbox("Spybot S and D", 190, 136, 97, 17)
Global $Checkbox13 = GUICtrlCreateCheckbox("RFA", 190 , 156, 97, 17)
Global $Checkbox14 = GUICtrlCreateCheckbox("Super anti spyware" , 190 , 176 , 107 ,17 )
Global $Button2 = GUICtrlCreateButton("Spyware", 190, 250, 75, 25, $WS_GROUP)
Global $Button8 = GUICtrlCreateButton("Default" , 190 ,210 , 75 , 25, $WS_GROUP)
;-------------------------------------------------------------------------------
;-----------------------------PARTIE DEFRAGMENTATION----------------------------
;-------------------------------------------------------------------------------
Global $Checkbox15 = GUICtrlCreateCheckbox("PagDeFrag" , 330,56,97,17)
Global $Checkbox16 = GUICtrlCreateCheckbox("MyDeFrag fast" , 330,76,97,17)
Global $Checkbox27 = GUICtrlCreateCheckbox("MyDeFrag slow" , 330,96,97,17)
Global $Button3 = GUICtrlCreateButton("Defragmenter", 330, 250, 75, 25, $WS_GROUP)
Global $Button9 = GUICtrlCreateButton("Default" , 330 ,210 , 75 , 25, $WS_GROUP)
;-------------------------------------------------------------------------------
;-----------------------------PARTIE REGISTRES----------------------------------
;-------------------------------------------------------------------------------
Global $Checkbox17 = GUICtrlCreateCheckbox("CCleaner R" , 450 , 56 , 97 ,17 )
Global $Checkbox18 = GUICtrlCreateCheckbox("PageDeFrag" , 450 , 76 , 97 , 17 )
Global $Checkbox19 = GUICtrlCreateCheckbox("GUP" , 450 , 96 , 97 , 17 )
Global $Checkbox20 = GUICtrlCreateCheckbox("ARC", 450 , 116 , 97 , 17 )
Global $Checkbox21 = GUICtrlCreateCheckbox("WRC" , 450 , 136 , 97 , 17 )
Global $Checkbox22 = GUICtrlCreateCheckbox("Optimizr" , 450 , 156 , 97 , 17 )
Global $Button4 = GUICtrlCreateButton("Registres", 450, 250, 75, 25, $WS_GROUP)
Global $Button10 = GUICtrlCreateButton("Default" , 450 ,210 , 75 , 25, $WS_GROUP)
;-------------------------------------------------------------------------------
;-----------------------------PARTIE OPTIMISATION-------------------------------
;-------------------------------------------------------------------------------
Global $Checkbox23 = GUICtrlCreateCheckbox("SMART" , 590 , 56 , 97 , 17 )
Global $Checkbox24 = GUICtrlCreateCheckbox("myCFG" , 590 , 76 , 97 , 17 )
Global $Checkbox25 = GUICtrlCreateCheckbox("ZEB" , 590 , 96 , 97 , 17 )
Global $Checkbox26 = GUICtrlCreateCheckbox("WASO" , 590 , 116 , 97 , 17 )
Global $Button5 = GUICtrlCreateButton("Optimisation", 590, 250, 75, 25, $WS_GROUP)
Global $Button11 = GUICtrlCreateButton("Default" , 590 ,210 , 75 , 25, $WS_GROUP)
;-------------------------------------------------------------------------------
;-----------------------------PARTIE OPTIMISATION-------------------------------
;-------------------------------------------------------------------------------
Global $Button6 = GUICtrlCreateButton("Nettoyage rapide" , 580, 300 , 100 , 25)
;-------------------------------------------------------------------------------
;-----------------------------ONGLET #2----------------------------------------
;-------------------------------------------------------------------------------
Global $TabSheet2 = GUICtrlCreateTabItem(" Pack Softwares ")
Global $Checkbox28 = GUICtrlCreateCheckbox("Open office" , 50 , 56 , 97 ,17 )
Global $Checkbox29 = GUICtrlCreateCheckbox("FireFox" , 50 , 96 , 97 ,17 )
Global $Checkbox30 = GUICtrlCreateCheckbox("ThunderBird" , 50 , 136 , 97 ,17 )
Global $Checkbox31 = GUICtrlCreateCheckbox("AcrobatReader" , 50 , 176 , 97 ,17 )
Global $Checkbox32 = GUICtrlCreateCheckbox("PowerP Viewer" , 50 , 216 , 97 ,17 )
Global $Checkbox33 = GUICtrlCreateCheckbox("CDBurnerXP" , 50 , 256 , 97 ,17 )
Global $Checkbox34 = GUICtrlCreateCheckbox("Flash FF" , 250 , 56 , 97 ,17 )
Global $Checkbox35 = GUICtrlCreateCheckbox("WMP FF" , 250 , 96 , 97 ,17 )
Global $Checkbox36 = GUICtrlCreateCheckbox("Flash IE" , 250 , 136 , 97 ,17 )
Global $Checkbox37 = GUICtrlCreateCheckbox("SilverLight" , 250 , 176 , 97 ,17 )
Global $Checkbox38 = GUICtrlCreateCheckbox("Quicktime" , 250 , 216 , 97 ,17 )
Global $Checkbox39 = GUICtrlCreateCheckbox("Adobe Air" , 250 , 256 , 97 ,17 )
Global $Checkbox40 = GUICtrlCreateCheckbox("JAVA" , 450 , 56 , 97 ,17 )
Global $Checkbox41 = GUICtrlCreateCheckbox("Vista C pack" , 450 , 96 , 97 ,17 )
Global $Checkbox42 = GUICtrlCreateCheckbox("Malware Bytes" , 450 , 136 , 97 ,17 )
Global $Checkbox43 = GUICtrlCreateCheckbox("SPYBOT" , 450 , 176 , 97 ,17 )
Global $Checkbox44 = GUICtrlCreateCheckbox("MyDefrag" , 450 , 216 , 97 ,17 )
Global $Checkbox45 = GUICtrlCreateCheckbox("CCleaner" , 450 , 256 , 97 ,17 )
Global $Button12 = GUICtrlCreateButton("Installer" , 450 ,350 , 75 , 25, $WS_GROUP)
Global $Button13 = GUICtrlCreateButton("Default" , 350 ,350 , 75 , 25, $WS_GROUP)
;-------------------------------------------------------------------------------
;-----------------------------PRINCIPAL----------------------------------------
;-------------------------------------------------------------------------------
GUISetState(@SW_SHOW)
GUISetBkColor(0xFFFFFF)
GUISetFont(10, 800, 0, 'Verdana')
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
$quitter=MsgBox(4 + 64, "SoClean", "Quitter l'application?")
If ($quitter=6) Then
Exit
EndIf
;-------------------------------------------------------------------------------
;Nettoyage
;-------------------------------------------------------------------------------
Case $Button7
ControlCommand ( "", "", $Checkbox1 , "check" )
ControlCommand ( "", "", $Checkbox2 , "check" )
ControlCommand ( "", "", $Checkbox3 , "check" )
ControlCommand ( "", "", $Checkbox4 , "check" )
ControlCommand ( "", "", $Checkbox5 , "check" )
ControlCommand ( "", "", $Checkbox6 , "check" )
ControlCommand ( "", "", $Checkbox7 , "check" )
;utilisation du cas dans lequel on appuie sur le bouton1
Case $Button1
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : 0%" )
;lecture de la valeur des checkbox
$getCheckbox1 = GUICtrlRead($Checkbox1)
$getCheckbox2 = GUICtrlRead($Checkbox2)
$getCheckbox3 = GUICtrlRead($Checkbox3)
$getCheckbox4 = GUICtrlRead($Checkbox4)
$getCheckbox5 = GUICtrlRead($Checkbox5)
$getCheckbox6 = GUICtrlRead($Checkbox6)
$getCheckbox7 = GUICtrlRead($Checkbox7)
;test, si checkbox coché
If _IsChecked($Checkbox1) then
; lancement de la mise à jour java-
Run(@ProgramFilesDir & "\Java\jre6\bin\jucheck.exe")
GUICtrlSetData( $Progress1 , 5)
GUICtrlSetData( $Label, "Avancement : 5%" )
EndIf
If _IsChecked($Checkbox2) then
; éxecution de CCleaner
RunWait(".\CORE\EXE\CCP\CCleaner.exe")
GUICtrlSetData( $Progress1 , 20)
GUICtrlSetData( $Label, "Avancement : 20%" )
EndIf
If _IsChecked($Checkbox3) then
; éxecution de Quick Clean
RunWait(".\CORE\EXE\QC\Quick Clean.exe")
GUICtrlSetData( $Progress1 , 30)
GUICtrlSetData( $Label, "Avancement : 30%" )
EndIf
If _IsChecked($Checkbox4) then
; éxecution de KCleaner
RunWait(".\CORE\EXE\KCP\KCleaner.exe")
GUICtrlSetData( $Progress1 , 40)
GUICtrlSetData( $Label, "Avancement : 40%" )
EndIf
If _IsChecked($Checkbox5) then
; éxecution de GUP
RunWait(".\CORE\EXE\GUP\GlaryUtilitiesPortable.exe")
GUICtrlSetData( $Progress1 , 60)
GUICtrlSetData( $Label, "Avancement : 60%" )
EndIf
If _IsChecked($Checkbox6) then
; éxecution de Javara
RunWait(".\CORE\EXE\RA\JAVARA.exe")
GUICtrlSetData( $Progress1 , 80)
GUICtrlSetData( $Label, "Avancement : 80%" )
EndIf
If _IsChecked($Checkbox7) then
; éxecution de WDC
RunWait(".\CORE\EXE\WDC\WiseDiskCleaner.exe")
GUICtrlSetData( $Progress1 , 100)
GUICtrlSetData( $Label, "Avancement : 100% Analyse terminée" )
sleep(500)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : En attente" )
EndIf
;-------------------------------------------------------------------------------
;Spywares
;-------------------------------------------------------------------------------
Case $Button8
ControlCommand ( "", "", $Checkbox8 , "check" )
ControlCommand ( "", "", $Checkbox9 , "check" )
ControlCommand ( "", "", $Checkbox10 , "check" )
ControlCommand ( "", "", $Checkbox11 , "check" )
ControlCommand ( "", "", $Checkbox12 , "check" )
Case $Button2
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : 0%" )
$getCheckbox8=GUICtrlRead($Checkbox8)
$getCheckbox9=GUICtrlRead($Checkbox9)
$getCheckbox10=GUICtrlRead($Checkbox10)
$getCheckbox11=GUICtrlRead($Checkbox11)
$getChecked12=GUICtrlRead($Checkbox12)
$getCheckbox13=GUICtrlRead($Checkbox13)
$getCheckbox14=GUICtrlRead($Checkbox14)
If _IsChecked($Checkbox8) then
; lancement de conficker
RunWait(".\CORE\EXE\CONFICKER\ES\CONFICKER.exe")
GUICtrlSetData( $Progress1, 20 )
GUICtrlSetData( $Label, "Avancement : 20%" )
EndIf
If _IsChecked($Checkbox9) then
;lancement de RAC
RunWait(".\CORE\EXE\RAC\RAC.exe /silent /norestart")
GUICtrlSetData( $Progress1, 40 )
GUICtrlSetData( $Label, "Avancement : 40%" )
EndIf
If _IsChecked($Checkbox10) then
If (@ProgramFilesDir & "\Malwarebytes' Anti-Malware\") Then
RunWait(@ProgramFilesDir & "\Malwarebytes' Anti-Malware\mbam.exe /runupdate")
RunWait(@ProgramFilesDir & "\Malwarebytes' Anti-Malware\mbam.exe /fullscanterminate")
GUICtrlSetData( $Progress1, 60 )
GUICtrlSetData( $Label, "Avancement : 60%" )
Else
RunWait(".\CORE\EXE\MB\MB.exe /verysilent")
RunWait(@ProgramFilesDir & "\Malwarebytes' Anti-Malware\mbam.exe /runupdate")
RunWait(@ProgramFilesDir & "\Malwarebytes' Anti-Malware\mbam.exe /fullscanterminate")
GUICtrlSetData( $Progress1, 60 )
GUICtrlSetData( $Label, "Avancement : 60%" )
EndIf
EndIf
If _IsChecked($Checkbox11) then
; lancement de NORMAN auto
$disque=InputBox("SoClean" , "Quel disque voulez vous examinez ?")
If ($disque) then
RunWait('.\CORE\EXE\NORMAN\NORMAN.exe /iagree /scan:'&$disque&': /run /nounpack /autoboot')
GUICtrlSetData( $Progress1, 80 )
GUICtrlSetData( $Label, "Avancement : 80%" )
Else
MsgBox(0,"SoClean","Mode automatique")
RunWait('.\CORE\EXE\NORMAN\NORMAN.exe /iagree /scan:c: /run /nounpack /autoboot')
GUICtrlSetData( $Progress1, 80 )
GUICtrlSetData( $Label, "Avancement : 80%" )
EndIf
EndIf
If _IsChecked($Checkbox12) Then
;lancement de l'installation de spybot s&d
If (@ProgramFilesDir & "\Spybot - Search & Destroy\SDMain.exe") Then
;mise à jour
Runwait(@ProgramFilesDir & "\Spybot - Search & Destroy\SDUpdate.exe /autoupdate /autoimmunize /autoclose")
;recherche
RunWait(@ProgramFilesDir & "\Spybot - Search & Destroy\SpybotSD.exe /autocheck /autofix /autoclose /norestart")
GUICtrlSetData( $Progress1, 99 )
GUICtrlSetData( $Label, "Avancement : 99%" )
Else
;installation
Runwait(".\CORE\EXE\SB\SPYBOT.exe /sp- /verysilent /norestart /suppressmsgboxes /tasks=""quicklaunchicon,launchsdhelper")
;mise à jour
Runwait(@ProgramFilesDir & "\Spybot - Search & Destroy\SDUpdate.exe /autoupdate /autoimmunize /autoclose")
;recherche
runWait(@ProgramFilesDir & "\Spybot - Search & Destroy\SpybotSD.exe /autocheck /autofix /autoclose /norestart")
GUICtrlSetData( $Progress1, 99 )
GUICtrlSetData( $Label, "Avancement : 99%" )
EndIf
EndIf
If _IsChecked($Checkbox13) Then
;lancement de facke
RunWait(".\CORE\EXE\RFA\RFA.exe")
EndIf
If _IsChecked($Checkbox14) Then
;lancement de super anti spyware
RunWait(".\CORE\EXE\SAS\SAS.COM")
EndIf
GUICtrlSetData( $Progress1 , 100)
GUICtrlSetData( $Label, "Avancement : 100% Analyse terminée" )
sleep(500)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : En attente" )
;-------------------------------------------------------------------------------
;defragmentation
;-------------------------------------------------------------------------------
Case $Button9
ControlCommand ( "", "", $Checkbox15 , "check" )
ControlCommand ( "", "", $Checkbox16 , "check" )
Case $Button3
$getCheckbox15=GUICtrlRead($Checkbox15)
$getCheckbox16=GUICtrlRead($Checkbox16)
If _IsChecked($Checkbox15) Then
;lancement de PageDFrag
RunWait(".\CORE\EXE\PAGEDEFRAG\PAGEDFRAG.exe -o")
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : 0%" )
EndIf
If _IsChecked($Checkbox16) Then
;lancement de MyDeFrag
RunWait(".\CORE\EXE\MYDEFRAG\MYDEFRAG.exe -r .\Scripts\DefragmentOnly.MyD -v C:")
RunWait(".\CORE\EXE\MYDEFRAG\MYDEFRAG.exe -r .\Scripts\SystemDiskMonthly.MyD -v C:")
GUICtrlSetData( $Progress1, 50 )
GUICtrlSetData( $Label, "Avancement : 50%" )
EndIf
If _IsChecked($Checkbox27) Then
;lancement de MyDefrag avec demande de selection du disque
$disque=InputBox("SoClean" , "Quel disque voulez vous examinez ?")
If ($disque) then
RunWait('.\CORE\EXE\MYDEFRAG\MYDEFRAG.exe -r .\Scripts\DefragmentOnly.MyD -v '& $disque &':')
RunWait('.\CORE\EXE\MYDEFRAG\MYDEFRAG.exe -r .\Scripts\SystemDiskMonthly.MyD -v '& $disque &':')
GUICtrlSetData( $Progress1, 50 )
GUICtrlSetData( $Label, "Avancement : 50%" )
EndIf
EndIf
GUICtrlSetData( $Progress1 , 100)
GUICtrlSetData( $Label, "Avancement : 100% Analyse terminée" )
sleep(500)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : En attente" )
;-------------------------------------------------------------------------------
;Registres
;-------------------------------------------------------------------------------
Case $Button10
ControlCommand ( "", "", $Checkbox17 , "check" )
ControlCommand ( "", "", $Checkbox18 , "check" )
ControlCommand ( "", "", $Checkbox21 , "check" )
ControlCommand ( "", "", $Checkbox22 , "check" )
Case $Button4
$getCheckbox17=GUICtrlRead($Checkbox17)
$getCheckbox18=GUICtrlRead($Checkbox18)
$getCheckbox19=GUICtrlRead($Checkbox19)
$getCheckbox20=GUICtrlRead($Checkbox20)
$getCheckbox21=GUICtrlRead($Checkbox21)
$getCheckbox22=GUICtrlRead($Checkbox22)
If _IsChecked($Checkbox17 ) Then
;lancement de CCleaner - Registres
RunWait(".\CORE\EXE\CCP\CCleaner.exe /REGISTRY")
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : 0%" )
EndIf
If _IsChecked($Checkbox18) Then
;lancement de pagedefrag
RunWait(".\CORE\EXE\PAGEDEFRAG\PAGEDFRAG.exe -o")
GUICtrlSetData( $Progress1 , 20)
GUICtrlSetData( $Label, "Avancement : 20% Analyse terminée" )
EndIf
If _IsChecked($Checkbox19) Then
;lancement de oneclik optimizer
RunWait(".\CORE\EXE\GUP\APP\oneclickoptimizer.exe")
GUICtrlSetData( $Progress1 , 40)
GUICtrlSetData( $Label, "Avancement : 40% Analyse terminée" )
EndIf
If _IsChecked($Checkbox20) Then
;lancement de ARc
RunWait(".\CORE\EXE\ARC\ARC.exe")
EndIf
If _IsChecked($Checkbox21) Then
;lancement de Wise registry cleaner
RunWait(".\CORE\EXE\WRC\WiseRegistryCleaner.exe")
GUICtrlSetData( $Progress1 , 60)
GUICtrlSetData( $Label, "Avancement : 60% Analyse terminée" )
EndIf
If _IsChecked($Checkbox22) Then
;lancement de l'optimisation de base de registres
RunWait(".\CORE\EXE\ERUNT\NTREGOPT.EXE silent")
GUICtrlSetData( $Progress1 , 80)
GUICtrlSetData( $Label, "Avancement : 80% Analyse terminée" )
EndIf
GUICtrlSetData( $Progress1 , 100)
GUICtrlSetData( $Label, "Avancement : 100% Analyse terminée" )
sleep(500)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : En attente" )
;-------------------------------------------------------------------------------
;Optimisation
;-------------------------------------------------------------------------------
Case $Button11
ControlCommand ( "", "", $Checkbox23 , "check" )
ControlCommand ( "", "", $Checkbox25 , "check" )
ControlCommand ( "", "", $Checkbox26 , "check" )
Case $Button5
$getCheckbox23=GUICtrlRead($Checkbox23)
$getCheckbox24=GUICtrlRead($Checkbox24)
$getCheckbox25=GUICtrlRead($Checkbox25)
$getCheckbox26=GUICtrlRead($Checkbox26)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : 0%" )
If _IsChecked($Checkbox23) Then
;lancement de SMART
RunWait(".\CORE\EXE\SMARTU\SMART\SMART.EXE")
GUICtrlSetData( $Progress1, 33 )
GUICtrlSetData( $Label, "Avancement : 33%" )
EndIf
If _IsChecked($Checkbox24) Then
;lancement de maconfig
RunWait(".\CORE\EXE\MAC\maconfig.exe")
EndIf
If _IsChecked($Checkbox25) Then
;lancement de Zeb utilities
RunWait(".\CORE\EXE\ZEB\Zeb-Utility.exe")
GUICtrlSetData( $Progress1, 66)
GUICtrlSetData( $Label, "Avancement : 66%" )
EndIf
If _IsChecked($Checkbox26) Then
;lancement de WASO
RunWait(".\CORE\EXE\UN\WASO.EXE")
EndIf
GUICtrlSetData( $Progress1 , 100)
GUICtrlSetData( $Label, "Avancement : 100% Analyse terminée" )
sleep(500)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : En attente" )
;-------------------------------------------------------------------------------
;Nettoyage rapide
;-------------------------------------------------------------------------------
Case $Button6
;Cas d'utilisation dans lequel on va lancer un nettoyage par défaut
;TO DO !
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : 0%" )
$disque=InputBox("SoClean" , "Quel disque voulez vous examinez ?") ; à developper
if ( $disque ) Then
;scripts .bat
RunWait(@ComSpec & ' /c echo o | chkdsk '&$disque&' /f', '')
GUICtrlSetData( $Progress1, 10 )
GUICtrlSetData( $Label, "Avancement : 10%" )
RunWait(@COMSPEC & '/c rd /s /q '&$disque&':\windows\temp')
RunWait(@COMSPEC & '/c rd /s /q '&$disque&':\windows\ie7')
RunWait(@COMSPEC & '/c rd /s /q '&$disque&':\windows\ie7updates')
RunWait(@COMSPEC & '/c rd /s /q '&$disque&':\windows\ie8')
RunWait(@COMSPEC & '/c rd /s /q '&$disque&':\windows\ie8updates')
GUICtrlSetData( $Progress1, 20 )
GUICtrlSetData( $Label, "Avancement : 20%" )
RunWait(@COMSPEC & '/c rd /s /q ' & @ProgramFilesDir & '\Adobe\Reader 9.0\Setup Files')
RunWait(@ComSpec & ' /c del /F /Q '&$disque&':\pagefile.sys')
RunWait(@ComSpec & ' /c attrib -h '&$disque&':\hiberfil.sys')
RunWait(@ComSpec & ' /c del /F /Q '&$disque&':\hiberfil.sys')
GUICtrlSetData( $Progress1, 30 )
GUICtrlSetData( $Label, "Avancement : 30%" )
RunWait(@ComSpec & ' /c ' & 'attrib ".\CORE\autoexec.bat"')
;.exe
RunWait(".\CORE\EXE\LSI\VDCSM.exe")
GUICtrlSetData( $Progress1, 40 )
GUICtrlSetData( $Label, "Avancement : 40%" )
Runwait(".\CORE\EXE\CCP\CCleaner.exe /auto")
GUICtrlSetData( $Progress1, 50 )
GUICtrlSetData( $Label, "Avancement : 50%" )
RunWait(".\CORE\EXE\GUP\APP\oneclickoptimizer.exe /schedulestart")
GUICtrlSetData( $Progress1, 60 )
GUICtrlSetData( $Label, "Avancement : 60%" )
RunWait(".\CORE\EXE\WDC\WiseDiskCleaner.exe -a -p")
GUICtrlSetData( $Progress1, 70 )
GUICtrlSetData( $Label, "Avancement : 70%" )
RunWait(".\CORE\EXE\MYDEFRAG\MYDEFRAG.EXE -r .\Scripts\SystemDiskDaily.MyD -v ")
GUICtrlSetData( $Progress1, 80 )
GUICtrlSetData( $Label, "Avancement : 80%" )
else
RunWait(@ComSpec & ' /c echo o | chkdsk C: /f', '')
GUICtrlSetData( $Progress1, 10 )
GUICtrlSetData( $Label, "Avancement : 10%" )
RunWait(@COMSPEC & '/c rd /s /q C:\windows\temp')
RunWait(@COMSPEC & '/c rd /s /q C:\windows\ie7')
RunWait(@COMSPEC & '/c rd /s /q C:\windows\ie7updates')
RunWait(@COMSPEC & '/c rd /s /q C:\windows\ie8')
RunWait(@COMSPEC & '/c rd /s /q C:\windows\ie8updates')
GUICtrlSetData( $Progress1, 20 )
GUICtrlSetData( $Label, "Avancement : 20%" )
RunWait(@COMSPEC & '/c rd /s /q ' & @ProgramFilesDir & '\Adobe\Reader 9.0\Setup Files')
RunWait(@ComSpec & ' /c del /F /Q C:\pagefile.sys')
RunWait(@ComSpec & ' /c attrib -h C:\hiberfil.sys')
RunWait(@ComSpec & ' /c del /F /Q C:\hiberfil.sys')
GUICtrlSetData( $Progress1, 30 )
GUICtrlSetData( $Label, "Avancement : 30%" )
RunWait(@ComSpec & ' /c ' & 'attrib ".\CORE\autoexec.bat"')
;.exe
RunWait(".\CORE\EXE\LSI\VDCSM.exe")
GUICtrlSetData( $Progress1, 40 )
GUICtrlSetData( $Label, "Avancement : 40%" )
Runwait(".\CORE\EXE\CCP\CCleaner.exe /auto")
GUICtrlSetData( $Progress1, 50 )
GUICtrlSetData( $Label, "Avancement : 50%" )
RunWait(".\CORE\EXE\GUP\APP\oneclickoptimizer.exe /schedulestart")
GUICtrlSetData( $Progress1, 60 )
GUICtrlSetData( $Label, "Avancement : 60%" )
RunWait(".\CORE\EXE\WDC\WiseDiskCleaner.exe -a -p")
GUICtrlSetData( $Progress1, 70 )
GUICtrlSetData( $Label, "Avancement : 70%" )
RunWait(".\CORE\EXE\MYDEFRAG\MYDEFRAG.EXE -r .\Scripts\SystemDiskDaily.MyD -v ")
GUICtrlSetData( $Progress1, 80 )
GUICtrlSetData( $Label, "Avancement : 80%" )
EndIf
GUICtrlSetData( $Progress1 , 100)
GUICtrlSetData( $Label, "Avancement : 100% Analyse terminée" )
sleep(500)
GUICtrlSetData( $Progress1, 0 )
GUICtrlSetData( $Label, "Avancement : En attente" )
;-------------------------------------------------------------------------------
;--------------------------------Pack softs-------------------------------------
;-------------------------------------------------------------------------------
Case $Button12
$getCheckbox28=GUICtrlRead($Checkbox28)
$getCheckbox29=GUICtrlRead($Checkbox29)
$getCheckbox30=GUICtrlRead($Checkbox30)
$getCheckbox31=GUICtrlRead($Checkbox31)
$getCheckbox32=GUICtrlRead($Checkbox32)
$getCheckbox33=GUICtrlRead($Checkbox33)
$getCheckbox34=GUICtrlRead($Checkbox34)
$getCheckbox35=GUICtrlRead($Checkbox35)
$getCheckbox36=GUICtrlRead($Checkbox36)
$getCheckbox37=GUICtrlRead($Checkbox37)
$getCheckbox38=GUICtrlRead($Checkbox38)
$getCheckbox39=GUICtrlRead($Checkbox39)
$getCheckbox40=GUICtrlRead($Checkbox40)
$getCheckbox41=GUICtrlRead($Checkbox41)
$getCheckbox42=GUICtrlRead($Checkbox42)
$getCheckbox43=GUICtrlRead($Checkbox43)
$getCheckbox44=GUICtrlRead($Checkbox44)
$getCheckbox45=GUICtrlRead($Checkbox45)
If _IsChecked($Checkbox28) Then
RunWait(".\CORE\EXE\KETARIN\APPS\OpenOffice.exe /S")
EndIf
If _IsChecked($Checkbox29) Then
RunWait(".\CORE\EXE\KETARIN\APPS\firefox.exe -ms")
EndIf
If _IsChecked($Checkbox30) Then
RunWait(".\CORE\EXE\KETARIN\APPS\Thunderbird.exe -ms")
EndIf
If _IsChecked($Checkbox31) Then
RunWait(".\CORE\EXE\KETARIN\APPS\AdobeReader.exe /sPB /rs /rps")
EndIf
If _IsChecked($Checkbox32) Then
RunWait(".\CORE\EXE\KETARIN\APPS\PPV.exe /quiet")
EndIf
If _IsChecked($Checkbox33) Then
RunWait(".\CORE\EXE\KETARIN\APPS\CdBurnerXp.exe /silent")
EndIf
If _IsChecked($Checkbox34) Then
RunWait(".\CORE\EXE\KETARIN\APPS\FlashNonIE.exe /silent")
EndIf
If _IsChecked($Checkbox35) Then
RunWait(".\CORE\EXE\KETARIN\APPS\FFWMP\ffplugin.msi /passive")
EndIf
If _IsChecked($Checkbox36) Then
RunWait(".\CORE\EXE\KETARIN\APPS\FlashIE.exe /silent")
EndIf
If _IsChecked($Checkbox37) Then
RunWait(".\CORE\EXE\KETARIN\APPS\Silverlight.exe /q")
EndIf
If _IsChecked($Checkbox38) Then
RunWait(".\CORE\EXE\KETARIN\APPS\QTA.exe /silent")
EndIf
If _IsChecked($Checkbox39) Then
RunWait(".\CORE\EXE\KETARIN\APPS\AdobeAir.exe -silent -eulaAccepted")
EndIf
If _IsChecked($Checkbox40) Then
RunWait(".\CORE\EXE\KETARIN\APPS\JRE.exe /passive")
EndIf
If _IsChecked($Checkbox41) Then
RunWait(".\CORE\EXE\KETARIN\APPS\VistaCodec.exe /S /v/qn")
EndIf
If _IsChecked($Checkbox42) Then
RunWait(".\CORE\EXE\KETARIN\APPS\Malwarebytes.exe /verysilent")
EndIf
If _IsChecked($Checkbox43) Then
If (@ProgramFilesDir & "\Spybot - Search & Destroy\SDMain.exe") Then
;mise à jour
Runwait(@ProgramFilesDir & "\Spybot - Search & Destroy\SDUpdate.exe /autoupdate /autoimmunize /autoclose")
Runwait(@ProgramFilesDir & "\Spybot - Search & Destroy\Spybot.exe /silent /SUPPRESSMSGBOXES /tasks=""!""""launchteatimer /norestart")
Else
;installation
Runwait(".\CORE\EXE\SB\SPYBOT.exe /sp- /verysilent /norestart /suppressmsgboxes /tasks=""quicklaunchicon,launchsdhelper")
;mise à jour
Runwait(@ProgramFilesDir & "\Spybot - Search & Destroy\SDUpdate.exe /autoupdate /autoimmunize /autoclose")
EndIf
EndIf
If _IsChecked($Checkbox44) Then
RunWait(".\CORE\EXE\KETARIN\APPS\Mydefrag.exe /VERYSILENT")
EndIf
If _IsChecked($Checkbox45) Then
RunWait(".\CORE\EXE\KETARIN\APPS\Ccleaner.exe /S")
EndIf
EndSwitch
WEnd
;-------------------------------------------------------------------------------------------------------
;-----------------------------------------------FONCTIONS-----------------------------------------------
;-------------------------------------------------------------------------------------------------------
Func _IsChecked($control)
Return BitAnd(GUICtrlRead($control),1) = 1
EndFunc
Cordialement
TOMOYO
