Hola a todos, estaba probando el proyecto Inject_en / RedirectHook / IAT, el que es muy conocido y estaba cambiando funciones de un programa como "GetTickCount", el código es algo así:

If Not RemoteHook(hProcess, "kernel32.dll", "GetTickCount", AddressOf MyGetTickCount) Then
    MsgBox "Couldn't hook MessageBoxA.", vbExclamation
    CloseProcess hProcess
    Exit Sub
End If
 

Igualmente BlackZeroX lo tiene en su página.

Ahora lo que yo pensé es que si puedo modificar esa función, podría modificar una función del programa, como por ej:

Public Function Suma(ByVal n1 As Long, ByVal n2 As Long) As Long
Suma = n1 + n2
End Function
 

Pero trato de modificar esa función y no encuentra nada es como que sólo capta funciones de windows alguna idéa?

Desde ya muchas gracias

Hola a todos, tenía una consulta, estoy probando enviar una tecla a este programa, gensplusrewind-1.0-win32-mk2k Pag: http://www.emulation-evolved.net/
Es un emulador de juegos, estoy tratando con SendInput, SendMessage y PostMessage pero nada , todavía no puedo lograr lo que hace el AutoIt 3.0 , tienen alguna idea?




Desde ya muchas gracias.
Misery.

Hola, tengo un problema, yo por ej creo una DLL en VB que posee lo siguiente:

Option Explicit
 
Public Function Mensaje(ByVal Msg As String) As String
Mensaje = Msg
End Function
 

Cuando lo llamo desde C++, por un MessageBox(NULL,MyFunction("Mensaje"),"CAPTION",MB_OK); me lo muestra vacío, alguna idea?

Y si tienen la solución a este Thread http://foro.elhacker.net/programacion_visual_basic/ayuda_callings_sub_y_functions-t307209.0.html sería un combo BOX  

Hola a todos, tengo una duda.

Tengo una Dll hecha en VB6,

Public Sub Mensaje()
Msgbox "Mensaje!"
End Sub
 

Como llamo a esa funcion desde C++?, ya probé con LoadLibrary y me tira error,

	// DLL function signature
	typedef double (*importFunction)(void);
 
	importFunction MyFunction;
	// Load DLL file
	HINSTANCE hinstLib = LoadLibrary("Project1.dll");
	if (hinstLib == NULL)
	{
		MessageBox(0,"ERROR: unable to load DLL","Error",0);
	}
	else
	{
		// Get function pointer
		MyFunction = (importFunction)GetProcAddress(hinstLib, "Mensaje");
		if (MyFunction == NULL)
		{
			MessageBox(0,"ERROR: unable to find DLL function","Error",0);
			FreeLibrary(hinstLib);
		}
		else
		{
 
		MyFunction();
 
		// Unload DLL file
		FreeLibrary(hinstLib);
		}
	}
 

alguna idea? Desde ya muchas gracias, si quieren subo los archivos.

Edit:
Es verdad  , lo que pasa es que estaba muy desesperado xDDDDD, ahi lo etiqueté 

Hola, quería saber si me podrían guiar con este tema:

Yo inyecto una dll en un programa, el programa tiene muchas funciónes y procedimientos, como hago para llamarlos desde la dll inyectada? alguna idea? Desde ya muchas gracias por resolver y aclarar mis dudas en los posts.

Ej: del ejecutable.

Option Explicit

Private Sub Command1_Click()
Dim var As Long

var = VarPtr(Valor(1, 1))

MsgBox var & " (" & Hex(var) & ")"
End Sub

Public Function Valor(ByVal v1 As Long, ByVal v2 As Long) As Long
Valor = v1 + v2
End Function

Esto hice para saber el address de la función.

Hola, me gustaría saber si me podrían aconsejar con el tema que voy a plantear.
Estaba intentando hacer hooking y lo pude hacer, ya sea inyectando DLL o cambiando una funcion por otra, esto es modo usuario. Lo intenté con el MessageBoxA  y funcionó en los procesos que cambiaba el codigo (inyectados), pero averigué que tenía que hacer en modo kernel para que sea general. He estado buscando informacion pero no pude solucionar mi problema, en sí, es hookear un API como por ejemplo MessageBoxA en el SO, si pudieran ayudarme sería de gran ayuda.





Desde ya muchas gracias.

Hola, quería saber si conocen la manera de saber si estoy ejecutando (lo que se podria decir programa, no conozco bien los terminos de eso) el programa desde VB o desde el EXE, lei algo sobre VB IDE or EXE, puede ser? sería el codigo en memoria ejecutado desde el compilador o desde el ejecutable propiamente dicho. Una vez tuve la respuesta y lo unico que recuerdo es ("vb32") y mi memoria esta borrosa, encontre otra manera que es con GetModule("VB6.EXE"), pero no es genérico. Desde ya muchas.