Page 1 sur 1

ImageSearch.au3 ( Ne fonctionne pas sous 64 Bits ? )

Posté : lun. 27 août 2018 09:58
par redlive
Bonjour à tous et toutes,


Je viens vers vous pour une petite question.
Je souhaite créer une installation automatique d'un logiciel, toutefois j'aimerai utilisé la fonction ImageSearch.au3.

Après avoir télécharger le fichier ZIP, copier le fichier dll et udf à la racine de mon script, le code dans mon script ressemble à ceci :

Code : Tout sélectionner

#include <ImageSearch.au3>
; Installation et configuration de Memu

; Lance le fichier exécutable
ShellExecute("Memu-Setup-5.5.7.1-ha36491101.exe")
 Sleep(15000)
; Pause en attendant le lancement de l'installation de Memu

$x1=0
$y1=0

$result = _ImageSearch("installer.bmp",1,$x1,$y1,0)
if $result=1 Then
    MouseMove($x1,$y1,3)
EndIf

Je lance le script, le logiciel d'installation ce lance et à la recherche d'image aucune réaction.

Pas de jugement attive les gars, j'ai rechercher et tester dans plein de sens mais je tourne en rond.
J'ai tester avec d'autre udf, même résultat.
J'ai tester voir si avec l'outil d'informations des fenêtre il me donnerai un code pour effectuer un clique immédiatement sur le bouton ( Aucun code )

Je tourne avec le pack autoit fr, et windows 8.1 fr 64Bits.

Des pistes ?

Merci pour votre aide et bonne journée , au plaisir de vous lire.

Re: ImageSearch.au3 ( Ne fonctionne pas sous 64 Bits ? )

Posté : lun. 27 août 2018 22:54
par Tlem
Bonsoir.
Dans l'éventualité ou cela serait lié à "une incompatibilité" avec un système x64, avez-vous pensez à compiler votre script en 32 bits ?
Peut-être aussi que cela est lié aux droits. Ajoutez #Require Admin en début de script au cas ou.

Après, je n'ai pas trop le temps de tester, je vous ai jeté les idées comme ça. ^^

Re: ImageSearch.au3 ( Ne fonctionne pas sous 64 Bits ? )

Posté : ven. 31 août 2018 13:21
par redlive
Bonjour tlem et merci pour ta réponse,


J'ai changer complètement mon code pour y introduire une GUI de téléchargement en voici le code :
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ImageSearch.au3>
#Region ### START Koda GUI section ### Form=E:\Interface.kxf
Global $Form1 = GUICreate("Télécharger Memu", 500, 500, 750, 250)
GUISetIcon("C:\Users\BOT'S COK\Downloads\flders_134_icons_on_dl_file_by_save3c\Floder.dll", -110)
Global $Button1 = GUICtrlCreateButton("Télécharger et installer MemuBot", 50, 450, 400, 40)
Global $Progress = GUICtrlCreateProgress(25, 400, 450, 25)
Global $LabelPourcent = GUICtrlCreateLabel("", 225, 430, 316, 17)
Global $LabelName = GUICtrlCreateLabel("", 80, 8, 316, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Local $destination = @ScriptDir & "Memubot\installation\"
While 1
   $nMsg = GUIGetMsg()
   Switch $nMsg
      Case $GUI_EVENT_CLOSE
         Exit
      Case $Button1
         ; Définit le chemin ou sera télécharger le fichier exécutable
         Local $sFilePath = @ScriptDir & "\Memubot\installation\"

         ; Création du répertoire \Memubot\Installation\
         DirCreate($sFilePath)
         Local $url = "http://dl.memuplay.com/download/Memu-Setup-5.5.7.1-ha36491101.exe"
         Local $fichier = $destination & "Memu-Setup-5.5.7.1-ha36491101.exe"
         _download($Progress, $LabelName, $LabelPourcent, $url, $fichier)
   EndSwitch
WEnd
Func _download($hProgress, $hLabelName, $LabelPourcent, $url, $nameFile)
   Local $hDownload = InetGet($url, $nameFile, 1, 1)
   Local $size = InetGetSize($url)
   Local $nowRead = 0
   Local $pourcent = 0
   GUICtrlSetData($LabelName, $nameFile)
   Do
      Sleep(50)
      $nowRead = InetGetInfo($hDownload, 0)
      $pourcent = Int(($nowRead / $size) * 100)
      GUICtrlSetData($hProgress, $pourcent)
      GUICtrlSetData($LabelPourcent, $pourcent & "%")
   Until InetGetInfo($hDownload, 2)
   InetClose($hDownload) ;
   Sleep(1000)
   ; Ferme la fenêtre de téléchargement
   $WinTitle = "Télécharger Memu"
   WinWait($WinTitle)
   WinClose($WinTitle)
   ; Ecécute l'exécutable Memu
   ShellExecute(@ScriptDir & "\Memubot\Installation\Memu-Setup-5.5.7.1-ha36491101.exe")
   Sleep(1000)
EndFunc   ;==>_download

; Pause de 10 sec en attendant que l'éxécutable se lance
Sleep(10000)

; recherche d'image Installer et déplacement dessus. ( ET LA JE BLOQUE, maus vais UDF? DLL? WINDOWS 64BITS?
Global $y1 = 0
Global $x1 = 0
Func Start()
   While 1
      $result = _ImageSearch("installer.png",1,$x1,$y1,0)
      if $result=1 Then
         MouseMove($x1,$y1,3)
         MsgBox(0,"Found","Found a empty recycle bin here...")
      EndIf
   WEnd
EndFunc
Start()
Les deux fichiers que j'utilise pour la détection d'image est dans les pièce jointes.

Franchement je bloque, complètement.

Format *.Png
*.bmp

Modificitation de la dll, de l'udf, ajout de #Require Admin au début du script.

Et bien je sèche, j'ai pas envie de changer de logiciel d'automatisation ce que Actiona pourrait faire transuilmmment, je veux de l'Autoit :-)


Merci pour ton, votre aide