Bonjour,

J'ai un soucis pour débugguer le script ci-dessous dans lequel je cherche à composer le nom d'une variable pour en récupérer le valeur.



Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim Team, TeamDCOM, TeamHTTP, cumul

TeamDCOM = "Good"
TeamHTTP = "Good"

IpDCOM = "192.168.1.12"
IpHTTP = "192.168.2.12"

FluxUnique "DCOM"
FluxUnique "HTTP"

Function FluxUnique(Flux)

a = "Team"
cumul=a&flux
If cumul = "Good" Then
MsgBox "OK"
ApplyIP "Ip"&Flux
Else
MsgBox "KO"
End If
End Function

Function ApplyIP(IP)

MsgBox IP
End Function

Merci de votre aide,

Cordialement,
François.