Objet WMI et Win32_process

Bonjour à tous

Je souhaiterais grace à un script, me connecter à un ordi distant et verifier ses PID.

Voici mon code:
   Dim sPidNum
  sPidNum="212"
  Dim oProc
  Dim objWMI
  Dim sQuery
  Dim bResult

  Set objWMI = GetObject("winmgmts:\root\cimv2")
  sQuery = "Select * from Win32_process"
  bResult = false

  For Each oProc In objWMI.execquery(sQuery)
    If oProc.name=sPidNum then
       bResult=true
       exit for
    else
       bResult=false
    End If
  Next

Voila ensuite je test bResult.

Ca fonctionne à merveille, mais je ne trouve pas comment faire ce test sur un ordi distant avec des parametres de connexion type compte+login.

Si qq un peu m'aider.

Merci.

 				salut

ajoute ceci dans tes déclarations :
strComputer = "." 


modifie ceci :
Set objWMI = GetObject("winmgmts:\root\cimv2")
par:
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")

quand strComputer contient ".", ca indique de le faire sur la machine ou est executé le script.  Si tu y met le nom de la machine sur lequel tu veux vérifier les processus, tu mets son nom dans strComputer.

 				*****  PRISE 2 ******

salut

ajoute ceci dans tes déclarations :
strComputer = "." 


modifie ceci :
Set objWMI = GetObject("winmgmts:\root\cimv2")
par:
Set objWMI = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")

quand strComputer contient ".", ca indique de le faire sur la machine ou est executé le script.  Si tu y met le nom de la machine sur lequel tu veux vérifier les processus, tu mets son nom dans strComputer.

Salut, j'ai essayé ce que tu me dis, mais il me renvoi une erreur d'acces non autorisé.

 Bonsoir,

Voir wbem.
http://www.vbfrance.com/codes/INVENTAIRE-FICHIERS-SUR-SERVER-DISTANT-LOCAL_41522.aspx

Cet exemple utilise aussi l'objet Dictionary
pour http://www.vbfrance.com/forum/sujet-ERREUR-AVEC-SCRIPTING-DICTIONARY_1294996.aspx

' Tutoriel:
' http://www.secretswindows.com/index.php?rubrique=scripts&ssrubrique=WMI&_
'        path=/WMI/&page=./scripts/wmi.htm


jean-marc