{{:autoit:menu1.jpg|:autoit:menu1.jpg}} #cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.4.9 Author: SurPriseS Script Function: Menu package auto. #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here #include #include ;#NoTrayIcon AutoItSetOption("TrayAutoPause",0) AutoItSetOption("TrayIconDebug",1) ; GUI GuiCreate("Speed Install - Design By ToMs - Code SurPriseS", 500, 470) GUISetState (@SW_SHOW) ;picture GuiCtrlCreatePic("logo.jpg",355,30, 120,40) GUICtrlCreatelabel (_DateTimeFormat( _NowCalc(),2), 355,80) ;chkbox GUICtrlCreateGroup("Pack Bureautique", 10, 10, 150, 220) $check1 = GUICtrlCreateCheckbox ("Firefox", 20, 25, 120, 20) $check2 = GUICtrlCreateCheckbox ("ThunderBird", 20, 45, 120, 20) $check3 = GUICtrlCreateCheckbox ("******", 20, 65, 120, 20) $check4 = GUICtrlCreateCheckbox ("******", 20, 85, 120, 20) $check5 = GUICtrlCreateCheckbox ("******", 20, 105, 120, 20) $check6 = GUICtrlCreateCheckbox ("******", 20, 125, 120, 20) $check7 = GUICtrlCreateCheckbox ("******", 20, 145, 120, 20) $check8 = GUICtrlCreateCheckbox ("******", 20, 165, 120, 20) $check9 = GUICtrlCreateCheckbox ("******", 20, 185, 120, 20) $check10 = GUICtrlCreateCheckbox ("******", 20, 205, 120, 20) GUICtrlCreateGroup("Pack Securite", 170, 10, 150, 100) $check11 = GUICtrlCreateCheckbox ("Avg", 180, 25, 120, 20) $check12 = GUICtrlCreateCheckbox ("******", 180, 45, 120, 20) $check13 = GUICtrlCreateCheckbox ("******", 180, 65, 120, 20) $check14 = GUICtrlCreateCheckbox ("******", 180, 85, 120, 20) GUICtrlCreateGroup("Drivers", 170, 130, 150, 100) $check15 = GUICtrlCreateLabel("Nvidia", 180, 145, 120, 20) GuiCtrlSetFont($check15, 9, 400, 4);underline GuiCtrlSetColor($check15, 0x0000FF) $check16 = GUICtrlCreateLabel("Ati", 180, 165, 120, 20) GuiCtrlSetFont($check16, 9, 400, 4);underline GuiCtrlSetColor($check16, 0x0000FF) $check17 = GUICtrlCreateLabel("Hitman Pro", 180, 185, 120, 20) GuiCtrlSetFont($check17, 9, 400, 4);underline GuiCtrlSetColor($check17, 0x0000FF) $check18 = GUICtrlCreatelabel ("******", 180, 205, 120, 20) GUICtrlCreateGroup("Pack Personnalisation", 330, 130, 150, 100) $check19 = GUICtrlCreateCheckbox ("Pcperso", 340, 145, 120, 20) $check20 = GUICtrlCreateCheckbox ("******", 340, 165, 120, 20) $check21 = GUICtrlCreateCheckbox ("******", 340, 185, 120, 20) $check22 = GUICtrlCreateCheckbox ("******", 340, 205, 120, 20) GUICtrlCreateGroup("Pack Basique", 10, 235, 470, 170) $check23 = GUICtrlCreateCheckbox ("7zip", 20, 250, 120, 20) $check24 = GUICtrlCreateCheckbox ("Acrobat Reader 8", 20, 270, 120, 20) $check25 = GUICtrlCreateCheckbox ("Java", 20, 290, 120, 20) $check26 = GUICtrlCreateCheckbox ("Maxi Compte", 20, 310, 120, 20) $check27 = GUICtrlCreateCheckbox ("Nero", 20, 330, 120, 20) $check28 = GUICtrlCreateCheckbox ("OpenOffice", 20, 350, 120, 20) $check29 = GUICtrlCreateCheckbox ("Pdf Créator", 20, 370, 120, 20) $check30 = GUICtrlCreateCheckbox ("Picasa", 180, 250, 120, 20) $check31 = GUICtrlCreateCheckbox ("VLC", 180, 270, 120, 20) $check32 = GUICtrlCreateCheckbox ("Windows Live MSN", 180, 290, 120, 20) $check33 = GUICtrlCreateCheckbox ("******", 180, 310, 120, 20) $check34 = GUICtrlCreateCheckbox ("******", 180, 330, 120, 20) $check35 = GUICtrlCreateCheckbox ("******", 180, 350, 120, 20) $check36 = GUICtrlCreateCheckbox ("******", 180, 370, 120, 20) $check37 = GUICtrlCreateCheckbox ("******", 340, 250, 120, 20) $check38 = GUICtrlCreateCheckbox ("******", 340, 270, 120, 20) $check39 = GUICtrlCreateCheckbox ("******", 340, 290, 120, 20) $check40 = GUICtrlCreateCheckbox ("******", 340, 310, 120, 20) $check41 = GUICtrlCreateCheckbox ("******", 340, 330, 120, 20) $check42 = GUICtrlCreateCheckbox ("******", 340, 350, 120, 20) ;Bouton $Button_1 = GUICtrlCreateButton ("Install", 200, 420, 100) While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE Exit ;---------------------Drivers ;nvidia Case $msg = $check15 _ShellEx('http://www.nvidia.fr/page/drivers.html') ;ati Case $msg = $check16 _ShellEx('http://ati.amd.com/support/driver.html') ;Hitman pro Case $msg = $check17 _ShellEx('http://hitmanpro1.dyndns.org/strider2/link.aspx?name=download') ;--------------------- Bouton install Case $msg = $button_1 ;---------------------Pack sécurité ; Avg If BitAnd(GuiCtrlRead( $check11),$GUI_CHECKED) Then MsgBox(32,"AVG","test") EndIf ;---------------------Pack personalisation ;Pcperso If BitAnd(GuiCtrlRead( $check19),$GUI_CHECKED) Then MsgBox(32,"pcperso","test") EndIf ;---------------------pack basique ;7zip If BitAnd(GuiCtrlRead( $check23),$GUI_CHECKED) Then $fichier = "7zip.zip" download($fichier) unzip($fichier) EndIf ;acrobat reader 8 If BitAnd(GuiCtrlRead( $check24),$GUI_CHECKED) Then $fichier = "acrobat_reader.zip" download($fichier) unzip($fichier) EndIf ;---------------------pack bureautique EndSelect Wend ;-------------------------------------------------FONCTION : ;-------------------------Download : Func download($fichier) if FileExists($fichier) then FileDelete($fichier) $proto = "ftp" $ip = "192.168.0.100" $chemin = "/stock1/package_auto_4/" $url = $proto & "://" & $ip & $chemin & $fichier $cmd = "wget.exe " & $url $affichage = "Telechargement de " & $fichier $check60 = GUICtrlCreateLabel($affichage, 200, 450) runwait($cmd,'',@SW_hide) $affichage = "Téléchargement terminée " $check60 = GUICtrlCreateLabel($affichage, 200, 450) sleep(500) $affichage = "Téléchargement terminée ." $check60 = GUICtrlCreateLabel($affichage, 200, 450) sleep(500) $affichage = "Téléchargement terminée .." $check60 = GUICtrlCreateLabel($affichage, 200, 450) sleep(500) $affichage = "Téléchargement terminée ..." $check60 = GUICtrlCreateLabel($affichage, 200, 450) EndFunc ;-------------------------Unzip : Func unzip($fichier) $cmd2 = "7za.exe x -y " & $fichier $affichage = "Décompréssion de " & $fichier $check60 = GUICtrlCreateLabel($affichage, 200, 450) runwait($cmd2,'',@SW_hide) $affichage = "Décompréssion terminée " $check60 = GUICtrlCreateLabel($affichage, 200, 450) sleep(500) $affichage = "Décompréssion terminée ." $check60 = GUICtrlCreateLabel($affichage, 200, 450) sleep(500) $affichage = "Décompréssion terminée .." $check60 = GUICtrlCreateLabel($affichage, 200, 450) sleep(500) $affichage = "Décompréssion terminée ..." $check60 = GUICtrlCreateLabel($affichage, 200, 450) EndFunc ;-------------------------Install : Func install($fichier) EndFunc ;-------------------------_ShellEx : Func _ShellEx($sCmd) DllCall("shell32.dll", "long", "ShellExecute", "hwnd", 0, "string", '', "string", $sCmd, "string", '', "string", '', "long", @SW_SHOWNORMAL) EndFunc ;==>_ShellEx