Discussion :

[riadh.meddeb]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[El_Titof]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

dans ton cas cela peut resembler à cela:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If instr(p_service, param_service) > 0 Then

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