Ver Mensaje Individual
  #6 (permalink)  
Antiguo 08/07/2011, 08:02
Avatar de Aquaventus
Aquaventus
 
Fecha de Ingreso: junio-2010
Ubicación: Lima-Peru , En el alba de la naturaleza
Mensajes: 2.105
Antigüedad: 14 años, 4 meses
Puntos: 267
Respuesta: Iformación para Matar procesos

Haber si te entiendo quieres tener un array de procesos no permitidos? si quieres eso puedes crear un array :
Código vb:
Ver original
  1. 'Creas el array con los nombres de los procesos que quieres que esten denegados
  2. Dim denegados As String() = {"firefox","iexplore","taskmgr","msnmsgr"}
luego podias crear un metodo como el que te pasé arriba y buscar si los procesos son iguales al de los arreglos y cerrarlos :
Código vb:
Ver original
  1. Private Sub DenegarProcesos()
  2.         'Obtienes todos los procesos y los recorres
  3.        For Each p As Process In Process.GetProcesses
  4.             'Recorremos el array de denegados
  5.            For Each proceso As String In denegados
  6.                 'Si el elemento del array es igual al proceso
  7.                If proceso.Equals(p.ProcessName) Then
  8.                     'lo matamos
  9.                    p.Kill()
  10.                 End If
  11.             Next
  12.         Next
  13.     End Sub
Una vez que ya se tiene el codigo, esto lo puedes tener ejecutando en un control Timer, cada 1 segundo. Para eso arrastras un control Timer que es en la caja de herramientas del lado izquierdo al formulario y en su propiedad Interval le colocas cada cuanto tiempo quieres que ejecute el proceso en milisegundos, si le pones 1000 ejecutará cada 1 segundo, y en la otra propiedad Enable del Timer lo colocas en True. Eso sería toda la configuración del Timer, ahora como último paso llamas al método DenegarProcesos dentro del evento Tick del Timer :
Código vb:
Ver original
  1. Private Sub timer1_Tick(sender As Object, e As EventArgs)
  2. DenegarProcesos()
  3. End Sub
Saludos!.
__________________
Internet es tener todo el conocimiento global a tu disposición.
Desarrollo de Software - Ejemplos .Net

Última edición por Aquaventus; 08/07/2011 a las 08:07