[R] Script récalcitrant

[BleuDiamant]

Voila je vous présente en bref mon problème je suis en stage dans une société et sur certain poste il y a u logiciel a installer qui s'appelle Flexnet celui si est plutôt gênant a installer car il y a besoin de oracle dotnetfx une police d’écriture spéciale et des fichier propriété.
J'ai donc Automatiser la chose avec un .bat il y a maintenant 2 semaine , mais il y a 2 jour j'ai voulue me mettre a autoit et j'ai donc commencer a apprendre les base et retranscrit mon .bat en Autoit.
Tout fonctionne impec sur ma machine mais quand je lance le script (Compiler) sur une autre machine celui si reste bloquer au tout début de ma fonction

► Afficher le texte

Code : Tout sélectionner

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Res_LegalCopyright=Nicolas
#AutoIt3Wrapper_Res_Language=1036
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#Region --- Menu 1 ---
;MsgBox Titre=Instalation_FlexNet_Automatique, Texte=Voulez vous vraiment installer flexnet ?, Boutons=Oui, Non, Icone=Question
If Not IsDeclared("iMsgBoxAnswer") Then Local $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(36,"Instalation_FlexNet_Automatique","Voulez vous vraiment installer flexnet ?")
Select
    Case $iMsgBoxAnswer = 6 ;Oui
if $iMsgBoxAnswer = 6 Then
    MsgBox(0,"Instalation_FlexNet_Automatique","Veillez ne pas toucher a la souris avant le redemarage complet de la machine")
    FlexNet()
EndIf
    Case $iMsgBoxAnswer = 7 ;Non
if $iMsgBoxAnswer = 7 Then
    Exit
EndIf
EndSelect
#EndRegion --- Menu 1 ---

;Fonction
Func FlexNet()
    FileCopy( @ScriptDir & "Installation_Flexnet\Installation Flexnet sous windows 7\3OF9.ttf" , "C:\Windows\Fonts" )
    Run(@ScriptDir & "Installation_Flexnet\Installation Flexnet sous windows 7\dotnetfx.exe" )
    [color=#FF0000]TrayTip("Installation de Dotnetfx","Début de l'installation de Dotnetfx","10")[/color]
    WinWaitActive("Programme d'installation de Microsoft .NET Framework 1.1", "Souhaitez-vous installer le package Microsoft .NET Framework 1.1?")
    ControlClick("Programme d'installation de Microsoft .NET Framework 1.1", "", 6, "left")
    WinWaitClose("Programme d'installation de Microsoft .NET Framework 1.1")
    TrayTip("Installation de Dotnetfx","Installation de Dotnetfx Terminé","10")

    TrayTip("Installation de Oracle","Début de l'installation de Oracle","10")
    ShellExecute(@ScriptDir & "Installation_Flexnet\Oracle92070\Oracle_Client_9.2.0.7.0_PS6_PR01_EN\1.0\Package\Oracle_Client_9.2.0.7.0_PS6_PR01_EN.msi")
    WinWaitActive("[CLASS:MsiDialogCloseClass]")
    ControlClick("[CLASS:MsiDialogCloseClass]", "", 7156, "left")
    WinWaitActive("[CLASS:MsiDialogCloseClass]", "User Information")
    ControlClick("[CLASS:MsiDialogCloseClass]", "", 7156, "left")
    WinWaitActive("[CLASS:MsiDialogCloseClass]", "Destination Folder")
    ControlClick("[CLASS:MsiDialogCloseClass]", "", 7156, "left")
    WinWaitActive("[CLASS:MsiDialogCloseClass]", "Ready to Install the Application")
    ControlClick("[CLASS:MsiDialogCloseClass]", "", 7154, "left")
    WinWaitActive("[CLASS:MsiDialogCloseClass]", "Oracle_Client_9.2.0.7.0_PS6_PR00_EN has been successfully installed.")
    ControlClick("[CLASS:MsiDialogCloseClass]", "", 7150, "left")
    FileCopy( @ScriptDir & "Installation_Flexnet\Installation Flexnet sous windows 7\tnsnames.ora" , "C:\Program Files\Oracle\ora92\network\ADMIN" )
    TrayTip("Installation de Oracle","Installation de Oracle Terminé","10")
    WinWaitClose("[CLASS:MsiDialogCloseClass]]")

    TrayTip("Installation de Flexnet","Début de l'installation de Flexnet","10")
    Run(@ComSpec & " /k " & "%cd%Installation_Flexnet\FlexNet721630\setup.exe flexnet.ini /dskshortcut")
    FileCopy( @ScriptDir & "Installation_Flexnet\Installation Flexnet sous windows 7\mfc71u.dll" , "C:\Windows\System32" )
    FileCopy( @ScriptDir & "Installation_Flexnet\Installation Flexnet sous windows 7\msvcp71.dll" , "C:\Windows\System32" )
    FileCopy( @ScriptDir & "Installation_Flexnet\Installation Flexnet sous windows 7\msvcr71.dll" , "C:\Windows\System32" )
    TrayTip("Installation de Flexnet","Installation de Flexnet terminé","10")

EndFunc
 

En rouge la seul partie de ma fonction qui s’exécute (Le menu au début s'affiche aussi)
Merci par avance de votre aide et désoler si le code est brouillon j'ai commencer il y a 2 jour ^^''

[mikell]

Tu oublies un backslash

Code : Tout sélectionner

@ScriptDir & "[b][color=#FF0000]\[/color][/b]Installation_Flexnet\...etc

[BleuDiamant]

ça a l'aire de fonctionner un erreur vraiment con x)
juste par curiosité pourquoi cela fonctionne t'il sur mon pc ?