Trucos de Visual Basic 6.0 Eliminar un proceso
Con este truco podrás eliminar un proceso que corre en la memoria. Para implementarlo basta con copiar el código fuente en un modulo de Visual Basic 6.0 y realizar la llamada con la función:
KillProcess(“nombreProceso”). Si existe mas de un proceso con el mismo nombre eliminará todos los procesos con ese nombre.
Public Sub KillProcess(ByVal processName As String)
On Error GoTo ErrHandler
Dim oWMI
Dim ret
Dim sService
Dim oWMIServices
Dim oWMIService
Dim oServices
Dim oService
Dim servicename
Set oWMI = GetObject("winmgmts:")
Set oServices = oWMI.InstancesOf("win32_process")
For Each oService In oServices
servicename = LCase(Trim(CStr(oService.Name) & ""))
If InStr(1, servicename, LCase(processName), vbTextCompare) >; 0 Then
ret = oService.Terminate
End If
Next
Set oServices = Nothing
Set oWMI = Nothing
ErrHandler:
Err.Clear
End Sub
Pon el truco en tus favoritos
Trucos relacionados de Eliminar un proceso
-
Truco de Visual Basic 6.0, 5 funciones de fechas
Gracias a este truco de visual basic 6.0 podrás: Saber la cantidad de días de un año determinado
Calcular la cantidad de días de un mes específico
Averiguar si un día corresponde a un fin de semana
Averiguar el último día de un Mes determinado
Ave
