VBS Reqeute

VBS Reqeute - VB/VBA/VBS - Programmation

Marsh Posté le 25-05-2005 à 11:51:10    

Bonjour
 
voila j ai ma reqeute
 
arrComputers = Array("frasprntst" )
 
'Conncection in Win32_NTLogEvent
For Each strComputer In arrComputers
 
   Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2" )
   Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_NTLogEvent " _
   & "where EventCode Like '10%'", "WQL", _
   wbemFlagReturnImmediately + wbemFlagForwardOnly)
 
   For Each objItem In colItems
 nb_print = nb_print + 1
   Next
Next
 
je voudrais tous les eventcode qui commence par 10
 
en fait le % ne marche pas pq ? ou est le pb ? Merci
Me donnait pas une solution de remplacement en contournant la solution  
mais vraiement je voudrais faire fonctionner le % (je suis sous W2000 au fait )
 
Merci

Reply

Marsh Posté le 25-05-2005 à 11:51:10   

Reply

Marsh Posté le 25-05-2005 à 14:50:38    

c'est parce que le "%" en SQL est là pour remplacer une chaîne de caractères d'une longueur indéterminée. Dans ton exemple "10%", SQL comprend que tu recherches une chaîne commençant par 10 suivi d'un nombre indéterminé de caractères. Voilà pourquoi ça ne marche pas, en revanche pour ce qui est de la solution....
 
Essaie peut-être '10'%' car on met une apostrophe devant ce genre de signes (comme avant des guillemets "" par exemple) lorsqu'on ne souhaite pas qu'ils soient interprétés par SQL mais qu'ils fassent seulement partie d'une chaîne de caractères.
 
[a][M][e]

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed