¿Cómo extrae VBS el PID de un proceso determinado?
Set w = GetObject("winmgmts:")
Set p = w.ExecQuery("select * from win32_process donde name='1.exe ' o nombre='2.exe' o nombre='3.exe' ")
si p.Count = 0 entonces
msgbox "El proceso especificado no se está ejecutando o el usuario no tiene permisos suficientes para obtener su información".
else
Para cada i en p
msgbox "El PID del proceso " & i.name & " es " & i.ProcessId
Siguiente
end if
El código anterior no tiene problemas cuando lo probé en mi máquina (Win7). El código anterior funciona bien en mi máquina (Win7). Si encuentra errores, puede publicar una captura de pantalla y lo intentaré.
------
Antes de la modificación:
'Usar objeto WMI
Establecer w = GetObject("winmgmts:" )
Establezca p = w.ExecQuery("select * from win32_process donde nombre= " & Chr(34) & "chrome.exe" & Chr(34) )
Para cada i En p
msgbox "Proceso " & i nombre & " "PID" & "PID" & "PID" & "PID" & "PID" & "PID" & "PID" & "PID " & "PID" & "PID" & "PID" & "PIDname & " El PID del proceso es " & i.ProcessId
'i.TerminateProcess' se utiliza para finalizar el proceso
Página siguiente
Por ejemplo, para encontrar el PID de todos los chrome.exe, puedes cambiarlo tú mismo a 1,2,3.exe
Para cada i en p p>
msgbox "Proceso " & i.