bonjour,

je souhaite lancer une application sur un PC distant

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Dim pc As String = "10.11.12.13"
        Dim connection As New ConnectionOptions 'Pour spécifier le nom d'utilisateur,password
        Dim scp As New ManagementScope 'Nouveau Scope
        connection.Impersonation = ImpersonationLevel.Impersonate
        connection.Username = "user" 'Assigne la valeurUsername a connection
        connection.Password = "password" 'Assigne la valeur de Passwordsa connection
        Display("Connexion à: " & pc & " en cours...")
 
            scp = New ManagementScope("\\" & pc & "\root\CIMV2", connection) 'Connecter a l'ordinateur
            scp.Connect()
la connection c'est OK, mais le lancement d'un programme distant, je n'y arrive pas...

Par avance Merci