expression régulière VBS

Bonjour,
je travaille sur un script vbs qui exclu une liste de service
le problème cette fois est que le service a exclure à une chaîne de caractère variable

la fonction est

Code:

---

1 2 3 4 5 6 7 8

On Error Resume Next   if ( ( p_computer = "*" Or UCase(p_computer) = UCase(param_computer) ) And p_service = param_service ) Then WriteLog "Exclusion => " + p_computer + " - " + p_service param_b_alert = False end if   End Sub

---

j'ai essayé de mettre comme paramètre mais le script bloque

ExclureService "*", "(%Nomduservice)*"
ExclureService "*", "Nomduservice*"


merci pour votre aide

Bonjour,

en vbscript si tu veux tester une partie d'une chaine il faut mieux utiliser "instr"
qui s'utilise de cette manière: InStr ([ start , ] string1 , string2 [, compare ])

Dans le cas ou il n'y a pas d'occurence la fonction retourne 0 (zéro) sinon un entier positif dans lequel cas tu vas tester si supérieur à zéro:

Code:

---

if (InStr ([ start , ] string1 , string2 [, compare ]) > 0) Then

---

dans ton cas cela peut resembler à cela:

Code:

---

If instr(p_service, param_service) > 0 Then

---

pour en savoir plus : https://msdn.microsoft.com/fr-fr/vba...or=-2147217396