Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: h0oke en 13 Julio 2009, 19:04 PM

Título: Duda obtener ID proceso
Publicado por: h0oke en 13 Julio 2009, 19:04 PM
Tengo una función que obtiene los procesos del sistema y luego según uno vaya seleccionando en un textbox coloca: "VB6.exe" "svchost.exe",etc. ¿A partir de ello se puede obtener el PID?
Título: Re: Duda obtener ID proceso
Publicado por: Novlucker en 13 Julio 2009, 19:06 PM
Y cual sería la función que lista los procesos? Con una adaptación de esa sería posible, y debes de tener en cuenta que puede haber varios procesos pero con el mismo nombre, y en este caso tendrías varios PID para un nombre

Saludos
Título: Re: Duda obtener ID proceso
Publicado por: h0oke en 13 Julio 2009, 19:09 PM
Tienes razón Novlucker me has dado una idea.

Pero tenía la duda si es que existe algo parecido a FindWindow(), en el cual uno pone el nombre de la venta y obtiene un handle que luego con getwindowprocessid obtiene el PID.
Título: Re: Duda obtener ID proceso
Publicado por: seba123neo en 14 Julio 2009, 01:34 AM
no se como estas listando pero si usas esta estructura, mas algunas api's ya tenes todo...

Código (vb) [Seleccionar]
Private Type PROCESSENTRY32 
     dwSize As Long 
     cntUsage As Long 
     th32ProcessID As Long 
     th32DefaultHeapID As Long 
     th32ModuleID As Long 
     cntThreads As Long 
     th32ParentProcessID As Long 
     pcPriClassBase As Long 
     dwFlags As Long ' Flags 
     szExeFile As String * MAX_PATH
End Type


saludos.
Título: Re: Duda obtener ID proceso
Publicado por: h0oke en 14 Julio 2009, 01:40 AM
Hola seba, mi estructura es algo parecida:
Código (vb) [Seleccionar]

Public Type PROCESSENTRY32
    dwSize As Long
    cntUsage As Long
    th32ProcessID As Long           ' This process
    th32DefaultHeapID As Long
    th32ModuleID As Long            ' Associated exe
    cntThreads As Long
    th32ParentProcessID As Long     ' This process's parent process
    pcPriClassBase As Long          ' Base priority of process threads
    dwFlags As Long
    szExeFile As String * 260       ' MAX_PATH
End Type


La saque de microsoft support.
Ahora lo que yo hacia era lo siguiente:

Código (vb) [Seleccionar]
Dim txtprocess() As String
Dim pathrv As String
Dim path As String
path = List1.List(List1.ListIndex)
pathrv = StrReverse(path)
If pathrv <> "" Then
    txtprocess = Split(pathrv, "\")
    Text1.Text = StrReverse(txtprocess(0))
Else
    MsgBox "No se encuentra proceso"
End If


para determinar mi proceso .exe, pero al fin y al cabo al parece no me sirve.

Lo que necesito es que cuando selecciono el item de la lista me aparezca su pid en un textbox.
Título: Re: Duda obtener ID proceso
Publicado por: seba123neo en 14 Julio 2009, 01:49 AM
fijate aca esta bien claro...

Listar procesos y ejecutables del sistema (http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/42.htm)

saludos.
Título: Re: Duda obtener ID proceso
Publicado por: h0oke en 14 Julio 2009, 01:51 AM
Gracias seba  ::)

Siempre he usado esa página y no se porque en estos momentos no la he visitado :S