Si no entendi mal, para lo que deseas hacer debes leerte algo de "Hooking" y "DLL Inyection"
Saludos
Saludos
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: ojopollo en 31 Julio 2011, 17:23 PM
me gustaria saber como se puede ocultar "X" proceso, o hacer un proceso que llame a otro, y asi solo aparece el 1º nombre d eproceso pero no los otros.
Cita de: tertulia en 24 Julio 2011, 00:52 AM
El caso es que según he estado viendo en los tres timers que tiene el form principal si es que es el llamado "PRESCORR" los tres estan en "False", probablemente me este equivocando de form.
Salu2
Cita de: .:UND3R:. en 23 Julio 2011, 00:48 AM
:O y como se hace eso no entiendo, podrías explicarlo un poco para agregarlo al tuto
Saludos
Cita de: alxspy en 10 Junio 2011, 00:26 AM
lo probe con el PID del notepad.exe bajo win xp y win7 pero en ambos casos no lee nada, osea en BytesLeidos me devuelve 0, y la funcion VirtualProtectEx tambien me devuelve 0...
Cita de: Fucko en 15 Junio 2011, 13:20 PM
es para parchear los ejecutables en memoria.....
cambiar bytes de un proceso ejecutado en memoria....
Cita de: alxspy en 16 Junio 2011, 01:34 AM
graxias, copie el codigo del post en un modulo .bas y llamo a esa funcion de esta manera:Private Sub Form_Load()
ObtenerPrivilegios SE_DEBUG_NAME
End Sub
pero no puede abrir el proceso ¿algo hice mal?, mi SO es windows 7 ¿sera este el problema?,el taskmgr si puede cerrar el proceso con facilidad , estuve revisando algo acerca del comando schtasks y tambien estoy que busco lo del AdjustTokenPrivileges.
mi cuenta de usuario es la unica y principal.
Private Declare Function OpenProcess Lib "Kernel32.dll" (ByVal dwDesiredAccessas As Long, ByVal bInheritHandle As Long, ByVal dwProcId As Long) As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Const PROCESS_ALL_ACCESS = &H1F0FFF
Private Sub Command1_Click()
ObtenerPrivilegios SE_DEBUG_NAME
End Sub
Private Sub Command2_Click()
Dim hOpen As Long
hOpen = OpenProcess(PROCESS_ALL_ACCESS, 0&, 800) ' // Abrimos el proceso por su PID
' // Cambia el "800" por el PID del proc que quieras
If hOpen = 0 Then
MsgBox "No abrio el proceso", vbCritical, "Error", 0, 0
Else
MsgBox "Se abrio el proceso", vbInformation, "Correcto", 0, 0
End If
CloseHandle (hOpen)
End Sub