@Radix
Thanks for your help.
AutoIt3 script OK
Except the last windows called Enregistrement:
It seems AutoIt script is unable to execute one of these commands:
WinWait("Adobe InDesign CS3", "Enregistrement")
WinActivate("Adobe InDesign CS3", "Enregistrement")
Opt("TrayIconDebug", 1)
Opt("SendKeyDelay", 200)
; Serial numbers
$SN1 = "XXXX-XXXX-XXXX-XXXX-XXXX-XXXX"
$SN2 = "XXXX-XXXX-XXXX-XXXX-XXXX-XXXX"
; Run Adobe InDesign CS3
Run(@ProgramFilesDir & "\Adobe\Adobe InDesign CS3\InDesign.exe")
; Installation du logiciel
WinWait("Adobe InDesign CS3 : Installation", "Installation du logiciel")
; Remove "-" from the first serial number
$SERIALNUMBER1 = StringReplace($SN1, "-", "")
$COD1 = StringMid($SERIALNUMBER1, 1, 4)
$COD2 = StringMid($SERIALNUMBER1, 5, 4)
$COD3 = StringMid($SERIALNUMBER1, 9, 4)
$COD4 = StringMid($SERIALNUMBER1, 13, 4)
$COD5 = StringMid($SERIALNUMBER1, 17, 4)
$COD6 = StringMid($SERIALNUMBER1, 21, 4)
; Installation du logiciel
WinActivate("Adobe InDesign CS3 : Installation", "Installation du logiciel")
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit1", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit1", $COD1)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit2", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit2", $COD2)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit3", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit3", $COD3)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit4", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit4", $COD4)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit5", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit5", $COD5)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit6", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Installation", "", "Edit6", $COD6)
;ControlClick("Adobe InDesign CS3 : Installation", "", "Button8")
;=====================================================================================
Send("!s")
;=====================================================================================
; Vérification de mise à niveau
WinWait("Adobe InDesign CS3 : Vérification de mise à niveau", "Vérification de mise à niveau")
WinActivate("Adobe InDesign CS3 : Vérification de mise à niveau", "Vérification de mise à niveau")
ControlCommand("Adobe InDesign CS3 : Vérification de mise à niveau", "", "ComboBox1", "ShowDropDown", "")
Send("{TAB}")
Send("{DOWN}")
Send("{ENTER}")
ControlSetText("Adobe InDesign CS3 : Vérification de mise à niveau", "", "Edit19", "")
Sleep(500)
ControlSetText("Adobe InDesign CS3 : Vérification de mise à niveau", "", "Edit19", $SN2)
Sleep(500)
;=====================================================================================
Send("!s")
;=====================================================================================
; Activer maintenant
WinWait("Adobe InDesign CS3 : Activer maintenant", "Activation par Internet")
WinActivate("Adobe InDesign CS3 : Activer maintenant", "Activation par Internet")
;=====================================================================================
Send("!a")
;=====================================================================================
WinWait("Adobe InDesign CS3 : Activé", "Activation réussie !")
WinActivate("Adobe InDesign CS3 : Activé", "Activation réussie !")
;=====================================================================================
Send("!s")
;=====================================================================================
; Enregistrement
WinWait("Adobe InDesign CS3", "Enregistrement")
WinActivate("Adobe InDesign CS3", "Enregistrement")
;=====================================================================================
Send("{TAB}")
Send("{TAB}")
Send("{DOWN}")
Send("{DOWN}")
Send("!c")
;=====================================================================================
Sleep(1000)
; Close Adobe InDesign CS3 process
$PID = ProcessExists("InDesign.exe")
If $PID Then
ProcessClose($PID)
EndIf
; Block mDNSResponder.exe (Bonjour) service to run on Windows startup
RegWrite("HKLM\SYSTEM\ControlSet001\Services\Bonjour Service", "Start", "REG_DWORD", "4")