AutoIt Français

Code : Tout sélectionner

#include <Array.au3>

Dim $a, $c, $t, $s

; ###################################################################
; Ceci est pour la démo. A supprimer dans le script final.
If not @Compiled then
    MsgBox(16, "Erreur", "Le script doit être compilé et lancé comme ceci : " & @TAB & @CRLF & _
    "test_Param.exe /a=salut /c=c:\temp /t=3 /s=1")
    Exit
Endif
; ###################################################################

If $cmdline[0] Then ; On contôle qu'il y à bien des paramètre en entrée.
    $aParam = StringSplit(" " & $CmdLineRaw, " /", 1) ; On découpe la ligne de paramètre en tableau.
    
    If IsArray($aParam) Then ; Si nous avons bien un tableau (paramètres entrés comme ceci : /x=...)
        If $aParam[1] = "" Then _ArrayDelete($aParam, 1) ; On vire la ligne vide.

        For $Boucle = 1 to $aParam[0] - 1 ; Boucle sur le nombre de paramètre.
            $aParamIn = StringSplit($aParam[$Boucle],"=") ; Découpage de chaque ligne de paramètre.
            Assign($aParamIn[1], $aParamIn[2]) ; Attribution automatique de la valeur à la variable.
                                               ; La variable est crée en fonction du nom du paramètre.
                                               ; Si vous rajoutez un paramètre /toto, la variable
                                               ; $toto est alors automatiquement crée.
        Next
    EndIf

; Affichage des variables.
MsgBox(64, "Infos", "En considérant la ligne de commande suivante : " & @TAB & @CRLF & _
        "test_Param.exe /a=salut /c=c:\temp /t=3 /s=1" & @CRLF & @CRLF & _
        "le paramètre /a est :   " & $a & @CRLF & _
        "le paramètre /c est :   " & $c & @CRLF & _
        "le paramètre /t est :   " & $t & @CRLF & _
        "le paramètre /s est :   " & $s )

Else
    MsgBox(16, "Erreur", "Aucun paramètre !!!") ; Si pas de paramètre alors erreur.

EndIf

Code : Tout sélectionner

Dim $param, $saisie, $premier, $second, $trois, $quatre
For $i = 1 To $$cmdline[0] Step 1
    $paramS = StringSplit($cmdline[$i], "=") ;je découpe dans un tableau chaque ligne du tableau cmdline par le "=" saisie par l'utilisateur lors de l'appel
    Select  ;je regarde la premiere ligne de $paramS et selon la lettre j'affecte dans la bonne variable
        Case $paramS[1] = "a"
            $premier = $paramS[2]
        Case $paramS[1] = "c"
            $second = $paramS[2]
        Case $paramS[1] = "t"
            $trois = $paramS[2]
        Case $paramS[1] = "s"
            $quatre = $paramS[2]
        Case Else
            MsgBox(0, "erreur", "ben quoi ?")
    EndSelect
Next
MsgBox(0, "", "param1 = " & $premier & @CRLF & "param2 = " & $second & @CRLF & "param3 = " & $trois & @CRLF & "param4 = " & $quatre) ;j'affiche le résultat :) ;affichage dans un msgbox