Et une petite seconde question pour la soirée :
j'ai essayé, j'ai cherché, j'ai fouillé, mais impossible d'arriver à simplifier ça, alors que je suis à peu près sur qu'il doit y avoir une combine, j'en appelle donc à vos esprits affutés pour m'apporter un peu d'aide, encore une fois :
Code : Tout sélectionner
Case $Param1="CM"
GUI_CM($Array[4][1])
Case $Param1=$Array100[2][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[2][1])
GUI_CM($Array[4][1])
Case $Param1=$Array100[3][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[3][1])
GUI_CM($Array[4][1])
Case $Param1=$Array100[4][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[4][1])
GUI_CM($Array[4][1])
Case $Param1=$Array100[5][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[5][1])
GUI_CM($Array[4][1])
Case $Param1=$Array100[6][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[6][1])
GUI_CM($Array[4][1])
Case $Param1=$Array100[7][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[7][1])
GUI_CM($Array[4][1])
Case $Param1=$Array100[8][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GMR_CENTRE_" & $Array100[8][1])
GUI_CM($Array[4][1])
Case $Param1=$Array102[2][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[2][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array102[3][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[3][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array102[4][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[4][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array102[5][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[5][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array102[6][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[6][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array102[7][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[7][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array102[8][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array102[8][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[2][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[2][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[3][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[3][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[4][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[4][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[5][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[5][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[6][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[6][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[7][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[7][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Case $Param1=$Array103[8][1]
$Array = IniReadSection(@ScriptDir & "\PCG.ini", "GP_GMR_" & $Array103[8][1])
Options($CentreMaint, $GroupMaint, $Array[4][1])
Merci beaucoup, et bonne soirée