#RequireAdmin #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=SNI.ico #AutoIt3Wrapper_Res_Fileversion=1.3.0.2 #AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y #AutoIt3Wrapper_Res_Language=1036 #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include #include #include #include Opt("GUIOnEventMode", 1) $SNI = GUICreate("Sud Nivernais Informatique - SNI", 551, 237, 187, 117) $Logo = GUICtrlCreatePic("T:\sauvegarde\sni.jpeg", 456, 24, 80, 60, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) ;~ ----------------------------------------------------------------------------------------------------------------- Checkbox GUICtrlSetFont(-1, 10, 800, 0, "Arno Pro Subhead") $Copyright = GUICtrlCreateLabel("Copyright © 2010 by Damda58", 0, 214, 550, 22) GUICtrlSetFont(-1, 10, 800, 0, "Arno Pro Caption") $Microsoft = GUICtrlCreateCheckbox("Microsoft Essantials", 290, 50, 129, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Avira = GUICtrlCreateCheckbox("Avira", 290, 70, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Avast = GUICtrlCreateCheckbox("Avast", 290, 90, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Drweb = GUICtrlCreateCheckbox("DrWeb", 290, 110, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Vlc = GUICtrlCreateCheckbox("Vlc", 170, 50, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Winrar = GUICtrlCreateCheckbox("Winrar", 170, 70, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Unlocker = GUICtrlCreateCheckbox("Unlocker", 170, 90, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $IE_vista = GUICtrlCreateCheckbox("IE Vista", 35, 50, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $IE_XP = GUICtrlCreateCheckbox("IE XP", 35, 70, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Firefox = GUICtrlCreateCheckbox("Firefox + Flash", 35, 90, 105, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### ;~ -------------------------------------------------------------------------------------------------------------- Boutons $SIW = GUICtrlCreateButton("System Info", 456, 104, 81, 25, $WS_GROUP) GUICtrlSetOnEvent(-1, "SIW") $Cureit = GUICtrlCreateButton("MAJ CureIT", 456, 136, 81, 25, $WS_GROUP) GUICtrlSetOnEvent(-1, "cureit") $Fermer = GUICtrlCreateButton("Quitter", 24, 184, 81, 25, $WS_GROUP) GUICtrlSetOnEvent(-1, "fermer") $Installer = GUICtrlCreateButton("Lancer", 456, 184, 81, 25, $WS_GROUP) GUICtrlSetOnEvent(-1, "installer") GUISetState(@SW_SHOW) ;~ ------------------------------------------------------------------------------------------------------------------- Copyright GUICtrlCreateLabel("Copyright © 2010 by Damda58", 0, 214, 550, 22) GUICtrlSetFont(-1, 10, 800, 0, "Arno Pro Caption") GUISetState(@SW_SHOW) ;~ -------------------------------------------------------------------------------------------------------------------------- Boucle affichage While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit ;~ ---------------------------------------------------------------------------------------------------------------------------------------Fonctions Func Installer() SplashTextOn("","Edition du log.ini", 300, 50) If _IsChecked($IE_vista) then IniWrite("log.ini", "1", "IE_vista", "1") Else IniWrite("log.ini", "1", "IE_vista", "0") If _IsChecked($IE_XP) then IniWrite("log.ini", "1", "IE_xp", "1") Else IniWrite("log.ini", "1", "IE_xp", "0") If _IsChecked($Firefox) then IniWrite("log.ini", "1", "Firefox", "1") Else IniWrite("log.ini", "1", "Firefox", "0") If _IsChecked($Vlc) then IniWrite("log.ini", "1", "Vlc", "1") Else IniWrite("log.ini", "1", "Vlc", "0") If _IsChecked($Winrar) then IniWrite("log.ini", "1", "Winrar", "1") Else IniWrite("log.ini", "1", "Winrar", "0") If _IsChecked($Unlocker) then IniWrite("log.ini", "1", "Unlocker", "1") Else IniWrite("log.ini", "1", "Unlocker", "0") If _IsChecked($Microsoft) then IniWrite("log.ini", "1", "Microsoft", "1") Else IniWrite("log.ini", "1", "Microsoft", "0") If _IsChecked($Avira) then IniWrite("log.ini", "1", "Avira", "1") Else IniWrite("log.ini", "1", "Avira", "0") If _IsChecked($Avast) then IniWrite("log.ini", "1", "Avast", "1") Else IniWrite("log.ini", "1", "Avast", "0") If _IsChecked($Drweb) then IniWrite("log.ini", "1", "Drweb", "1") Else IniWrite("log.ini", "1", "Drweb", "0") EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf Sleep(1500) $checkl = IniRead("log.ini", "1", "IE_vista", "") $check2 = IniRead("log.ini", "1", "IE_xp", "") $check3 = IniRead("log.ini", "1", "Firefox", "") $check4 = IniRead("log.ini", "1", "Vlc", "") $check5 = IniRead("log.ini", "1", "Winrar", "") $check6 = IniRead("log.ini", "1", "Unlocker", "") $check7 = IniRead("log.ini", "1", "Microsoft", "") $check8 = IniRead("log.ini", "1", "Avira", "") $check9 = IniRead("log.ini", "1", "Avast", "") $check10 = IniRead("log.ini", "1", "Drweb", "") SplashTextOn("","Test du log.ini", 300, 50) Sleep(1500) If $checkl = "1" then CHECK1() Else If $check2 = "1" then CHECK1() Else If $check3 = "1" then CHECK1() Else If $check4 = "1" then CHECK1() Else If $check5 = "1" then CHECK1() Else If $check6 = "1" then CHECK1() Else If $check7 = "1" then CHECK1() Else If $check8 = "1" then CHECK1() Else If $check9 = "1" then CHECK1() Else If $check10 = "1" then CHECK1() Else MsgBox(64, "SNI - Information", "Veuilez Sélectionner les logiciels à installer") EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf EndIf SplashOff() EndFunc Func CHECK1() $checkl = IniRead("log.ini", "1", "IE_vista", "") If $checkl = "1" Then Run("IE_vista.bat") CHECK2() Else CHECK2() EndIf EndFunc Func CHECK2() $check2 = IniRead("log.ini", "1", "IE_xp", "") If $check2 = "1" Then Run("IE_xp.bat") CHECK3() Else CHECK3() EndIf EndFunc Func CHECK3() $check3 = IniRead("log.ini", "1", "Firefox", "") If $check3 = "1" Then SplashTextOn("","Installation Firefox en cours", 300, 50) RunWait("logiciels/Firefox.exe -ms -ira") SplashTextOn("","Installation Flash en cours", 300, 50) RunWait("logiciels/flashplayer.exe /s") SplashOff() Sleep(300) CHECK4() Else CHECK4() EndIf EndFunc Func CHECK4() $check4 = IniRead("log.ini", "1", "Vlc", "") If $check4 = "1" Then SplashTextOn("","Installation vlc en cours", 300, 50) RunWait("logiciels/vlc.exe -y /q /r:n /S") SplashOff() CHECK5() Else CHECK5() EndIf EndFunc Func CHECK5() $check5 = IniRead("log.ini", "1", "Winrar", "") If $check5 = "1" Then SplashTextOn("","Installation winrar en cours", 300, 50) RunWait("logiciels/Winrar.exe /s /noreboot") SplashOff() CHECK6() Else CHECK6() EndIf EndFunc Func CHECK6() $check6 = IniRead("log.ini", "1", "Unlocker", "") If $check6 = "1" Then RunWait("") CHECK7() Else CHECK7() EndIf EndFunc Func CHECK7() $check7 = IniRead("log.ini", "1", "Microsoft", "") If $check7 = "1" Then RunWait("") CHECK8() Else CHECK8() EndIf EndFunc Func CHECK8() $check8 = IniRead("log.ini", "1", "Avira", "") If $check8 = "1" Then RunWait("") CHECK9() Else CHECK9() EndIf EndFunc Func CHECK9() $check9 = IniRead("log.ini", "1", "Avast", "") If $check9 = "1" Then SplashTextOn("","Installation avast! en cours", 300, 50) RunWait("logiciels/avast.exe /VERYSILENT /SP ") SplashOff() CHECK10() Else CHECK10() EndIf EndFunc Func CHECK10() $checkl0 = IniRead("log.ini", "1", "Drweb", "") If $checkl0 = "1" Then SplashTextOn("","Suppression des fichiers d'installation", 300, 50) IniWrite("log.ini", "1", "IE_vista", "0") IniWrite("log.ini", "1", "IE_XP", "0") IniWrite("log.ini", "1", "Firefox", "0") IniWrite("log.ini", "1", "Vlc", "0") IniWrite("log.ini", "1", "Winrar", "0") IniWrite("log.ini", "1", "Unlocker", "0") IniWrite("log.ini", "1", "Microsoft", "0") IniWrite("log.ini", "1", "Avira", "0") IniWrite("log.ini", "1", "Avast", "0") Sleep(2000) SplashOff() Else SplashTextOn("","Suppression des fichiers d'installation", 300, 50) IniWrite("log.ini", "1", "IE_vista", "0") IniWrite("log.ini", "1", "IE_XP", "0") IniWrite("log.ini", "1", "Firefox", "0") IniWrite("log.ini", "1", "Vlc", "0") IniWrite("log.ini", "1", "Winrar", "0") IniWrite("log.ini", "1", "Unlocker", "0") IniWrite("log.ini", "1", "Microsoft", "0") IniWrite("log.ini", "1", "Avira", "0") IniWrite("log.ini", "1", "Avast", "0") Sleep(2000) SplashOff() MsgBox(64, "SNI - Information", "Installation terminé merci d'avoir utilisé notre logiciel") EndIf EndFunc Func _IsChecked($control) Return BitAnd(GUICtrlRead($control),$GUI_CHECKED) = $GUI_CHECKED EndFunc Func fermer() Exit 0 EndFunc Func SIW() Run("logiciels/SIW.exe") EndFunc Func cureit() Run("logiciels/cureit/DrWeb.exe") Sleep(1000) EndFunc EndSwitch WEnd