lancer un script ou une appli sur un pc sur le reseau local - VB/VBA/VBS - Programmation
Marsh Posté le 09-05-2005 à 11:56:14
alpia_ a écrit : Salut à tous! |
J'ai la réponse!
'Variable pour rendre la fenetre Affiché
Const HIDDEN_WINDOW = 1
'L'ordinateur cible
strComputer = "ip dla machine"
'Connexion au service WMI et initialisation de ProcessStartup
Set objStartup = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_ProcessStartup" )
'Connexion au service WMI et initialisation de Process
Set objProcess = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_Process" )
'Pour afficher la fenêtre
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = HIDDEN_WINDOW
errReturn = objProcess.Create("notepad.exe", null, objConfig, intProcessID)
Merci qui? merci moi!
ok vous vous en foutez
Marsh Posté le 21-10-2006 à 12:43:37
Bonjour,
Comment faire pour une liste de machine (liste dans un fichier txt)? Quelqu'un pourrait-il ajouter une petite boucle.
Je sais que c'est pas bien compliqué mais j'ai pas trop le temps de chercher en ce moment
Marsh Posté le 09-05-2005 à 09:29:54
Salut à tous!
je voudrais savoir comment faire pour lancer, depuis mon ordinateur, un script ou une appli sur un autre ordinateur sur mon reseau local?
Merciii
Message édité par alpia_ le 09-05-2005 à 09:55:37