En fait quand je veux tester mon script, je vais dans le menu Outils / Executer, à ce moment là, il n'est pas compilé, j'ai quand même essayé de compiler 86x et j'ai toujours le même résultat, à la différence que j'avais 1
Concernant la remarque sur la fonction 7ZipStartup, j'ai changé en mode 'bourrin' et j'ai mis 32 sur toutes les dll, et cette fois le renvoi du message est 2
Je n'arrive toujours pas à régler ce problème, et je n'arrive pas à comprendre pourquoi cela fonctionnait au début et plus, après une mise à jour Windows...
Code : Tout sélectionner
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.14.2
Auteur: Sydneysyd
Fonction du Script :
Modèle de Script AutoIt.
#ce ----------------------------------------------------------------------------
;copie des fichiers nécessaire dans le dossier temporaire
DirCreate(@tempdir & "\EasyCloudV2\")
FileInstall("C:\Users\Sydneysyd\Desktop\_A RANGER\_Personnel\AUTOIT\EasyCloud V2\Aide.pdf", @tempdir & "\EasyCloudv2\Aide.pdf", 1)
FileInstall("C:\Users\Sydneysyd\Desktop\_A RANGER\_Personnel\AUTOIT\EasyCloud V2\Documentations Cloud.7z", @tempdir & "\EasyCloudv2\Documentations Cloud.7z", 1)
FileInstall("C:\Users\Sydneysyd\Desktop\_A RANGER\_Personnel\AUTOIT\EasyCloud V2\favicon HorizonWEB.ico", @tempdir & "\EasyCloudv2\favicon HorizonWEB.ico", 1)
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <7Zip.au3>
#Region ### START Koda GUI section ### Form=C:\Users\Sydneysyd\Desktop\_A RANGER\_Personnel\AUTOIT\EasyCloud V2\EasyCloud.kxf
Global $EasyCloud = GUICreate("EasyCloud V2", 224, 230, 192, 124)
Global $JD = GUICtrlCreateGroup("Julien DAVID - JVS", 8, 8, 201, 209)
Global $Chrome = GUICtrlCreateButton("Installation Google Chrome", 16, 32, 185, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Calibri")
GUICtrlSetBkColor(-1, 0x3399FF)
GUICtrlSetCursor (-1, 2)
Global $Button2 = GUICtrlCreateButton("Raccourci Horizon Web", 15, 66, 185, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Calibri")
GUICtrlSetBkColor(-1, 0x3399FF)
GUICtrlSetCursor (-1, 2)
Global $Docs = GUICtrlCreateButton("Documentations", 16, 102, 185, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Calibri")
GUICtrlSetBkColor(-1, 0x3399FF)
GUICtrlSetCursor (-1, 2)
Global $Infos = GUICtrlCreateButton("Infos & Aide", 16, 140, 185, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Calibri")
GUICtrlSetBkColor(-1, 0x3399FF)
GUICtrlSetCursor (-1, 2)
Global $Quit = GUICtrlCreateButton("Quitter", 16, 178, 185, 25)
GUICtrlSetFont(-1, 8, 400, 0, "Calibri")
GUICtrlSetBkColor(-1, 0x3399FF)
GUICtrlSetCursor (-1, 2)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Chrome
; Extraction d'une archive vers un dossier.
#RequireAdmin
DirCreate(@ProgramFilesDir & "\GoogleChrome\")
_7ZIPExtractEx(0, @tempdir & "\EasyCloudV2\GoogleChrome.7z", @ProgramsDir & "\GoogleChrome\", 0, 1, 1, 0, 0, 0, 1)
$erreur = @error
If @error = 0 Then
MsgBox(64, "Information", "Installation terminée ! ")
Else
MsgBox(64, "Erreur ! ", "Erreur lors de l'extraction de l'archive " & $erreur)
EndIf
Case $Quit
DirRemove(@tempdir & "\EasyCloudV2\",1)
Exit
Case $Infos
ShellExecute(@tempdir & "\EasyCloudV2\Aide.pdf")
MsgBox(0, "Création By Julien DAVID", @CRLF & "Chargé de clientèle JVS-Mairistem" & @CRLF & "Mail : julien.david@jvs.fr" & @CRLF & "Copyright 2017")
_7ZIPExtractEx (0, @tempdir & "\EasyCloudV2\Documentations Cloud.7z", @DesktopDir,1,0,1,0)
TrayTip ("Copie", "Copie des documents sur le bureau, veuillez patienter...", 1000)
If @error = 0 Then
MsgBox(64, "Information", "Documents sur le bureau ! ")
EndIf
EndSwitch
WEnd