[WQL]properties

Canard007 Messages postés 5954 Date d'inscription   Statut Contributeur -  
Canard007 Messages postés 5954 Date d'inscription   Statut Contributeur -
Salut,

Suite à :
http://www.commentcamarche.net/forum/affich-857757-%5BJava%5DCIM

je recherche comment recuperer les propriété d'une "table" CIM
telle que Win32_Process par exemple.
Msdn propose en WQL le select suivant:
(SELECT * FROM __InstanceModificationEvent WITHIN 600 WHERE TargetInstance ISA "Win32_LogicalDisk")

Mais en testant en vbs ca marche pas...aurais je commis une boulette? une redoutable erreur ? une legere incoprehension? qq un a une idee qq un meurt il d envie de m aider?

mmerci de votre aide

1 réponse

  1. Canard007 Messages postés 5954 Date d'inscription   Statut Contributeur 216
     
    bon ba probleme resolu a l aide du ch'ti script que voila ..reste plus qu a le convertir en java..

    strComputer = "."
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
     
    For Each objclass in objWMIService.SubclassesOf()
        intCounter=0
        If Left(objClass.Path_.Class,5) = "Win32" Then
            For Each Qualifier in objClass.Qualifiers_
                If UCase(Trim(Qualifier.Name)) = "ASSOCIATION" Then
                    intCounter = 1
                End If
            Next
            If x = 0 Then
                strComputer = "."
                Set objWMIService = GetObject _
                    ("winmgmts:{impersonationLevel=impersonate}!\\" & _
                        strComputer & "\root\cimv2")
                Set strClass = objWMIService.Get(objClass.Path_.Class)
                Wscript.Echo "PROPERTIES:"
                For each strItem in strClass.properties_
                    Wscript.Echo objClass.Path_.Class & vbTab & strItem.name 
                Next
                Wscript.Echo "METHODS:"
                For Each strItem in strClass.methods_
                    Wscript.Echo objClass.Path_.Class & vbTab & strItem.name 
                Next
            End If
        End If
    Next
    
    


    En fait je devrai arreter de poser des questions "pointus" je sent que je dois en mettre dans le desaroi plus d'un ^^
    merci a ceux qui aurai essayer de m'aider..
    c u a la prochaine question inbitable ^^
    0