Discussion :

[jubourbon]

Bonjour à tous

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

Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
   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.

[ced600]

c'est possible avec SWbemLocator. Il est décrit sur le site MSDN dans la partie \"Using WMI"\"Creating WMI Clients"\"Connecting to WMI on a remote computer":
http://msdn.microsoft.com/en-us/libr...90(VS.85).aspx