Task Manager Process

[zXxOsirisxXz]

Hola

Kisiera saber si es posible que alguien me dijese como eliminar algunos procesos que corren en el task manager por mi "Usuario" de forma automatica y por tiempo.

Me explico, tengo un molestoso proceso que corre a nombre del usuario [Osea yo] que se llama dllhost.exe, que por supuesto estoy seguro, que no soy yo quien lo esta ejecutando, ya buske info sobre esto, y el que aparece en google es algo asi como un virusazo, pero este k tengo es aparentemente un acceso remoto a mi PC. Este aparecio, luego de k volvi a instalar el windows por un script k me obligo a tener k instalar otro Windows.

kisiera un script para terminar su proceso, y no tener k acabarlo siempre..

Gracias.

[happy-word]

bueno montro yo te recomiendo que uses un bat que contenga los codigos para eliminar prosesos de windows  este seria asi:


codigo del archivo bat    €€ matar.bat  €€

--------------inicio-----------------------------

taskkill /im dllhost.exe /f

_________fin__ _____________

esto terminara el proseso.

bueno crea este bat y luego ponlo como una tarea programada cada sierto tiempo

mara mas informacion acerca de como matar prosesos con el taskkill

escribe taskkill /?  para obtener ayuda en el command.exe

[crypto136]

Agregar los siguientes controles:
1 List1, 2 command1

Código fuente en un formulario:

'

Código:

Variables para usar Wmi
Dim ListaProcesos As Object
Dim ObjetoWMI As Object
Dim ProcesoACerrar As Object


Private Function MatarProceso(StrNombreProceso As String, _
                              Optional DecirSINO As Boolean = True) As Boolean

MatarProceso = False

Set ObjetoWMI = GetObject("winmgmts:")

If IsNull(ObjetoWMI) = False Then

    'instanciamos la variable

    Set ListaProcesos = ObjetoWMI.InstancesOf("win32_process")

    For Each ProcesoACerrar In ListaProcesos
        If UCase(ProcesoACerrar.Name) = UCase(StrNombreProceso) Then
            If DecirSINO Then

                If MsgBox("¿Matar el proceso " & _
                    ProcesoACerrar.Name & vbNewLine & "...¿Está seguro?", _
                                        vbYesNo + vbCritical) = vbYes Then

                    ProcesoACerrar.Terminate (0)

                    MatarProceso = True

                End If

            Else

            'Matamos el proceso con el método Terminate
                ProcesoACerrar.Terminate (0)
                MatarProceso = True

            End If
        End If

Next
End If

'Elimina las variables
Set ListaProcesos = Nothing
Set ObjetoWMI = Nothing
End Function

Private Sub Listar()

Set ObjetoWMI = GetObject("winmgmts:")

If IsNull(ObjetoWMI) = False Then

' En esta variable se obtienen los procesos
Set ListaProcesos = ObjetoWMI.InstancesOf("win32_process")

'Recorremos toda la coleccion en la lista de procesos _
 y la añadimos al control listbox

For Each ProcesoACerrar In ListaProcesos
    List1.AddItem LCase$(ProcesoACerrar.Name)
Next

End If

'Eliminamos las variables de objeto

Set ListaProcesos = Nothing
Set ObjetoWMI = Nothing

End Sub

Private Sub Command1_Click()

'Llamamos a MatarProceso pasandole el nombre
MatarProceso LCase$(List1), True
'Borramos el list
List1.Clear
'Volvemos a listar los procesos
Listar

End Sub

Private Sub Command2_Click()

'Borramos la lista y volvemos a listar los procesos

List1.Clear
Listar

End Sub

Private Sub Form_Load()
Command2.Caption = " Listar Procesos"
Command1.Caption = " Cerrar Proceso "
Me.Caption = " Wmi - ejemplo para manipular procesos de windows "
End Sub

juega un poco con los codigos agregale un timer o algo y combinalo con el codigo.

[zXxOsirisxXz]

Gracias Crypto!!! :D:D:D:D

Solo me faltaria ponerle un timer k cada 10 minutos verifique si esta corriendo y lo mate ^^

Pero muchas gracias por el codigazoo!!!!