Cargar dinamicamente una dll en VB6
 

Mi duda es que quiero cargar una dll que he creado pero quiero cargarla dinamicamente en un binario que tengo de VB6, o sea, no tengo los fuentes de dicho binario.
Si fuese en C o C++ podriamos usar LoadLibrary, GetModuleHandle, GetProcAddress, y FreeLibrary para cargar la dll, usar sus funciones y por ultimo liberar la dll.
En VB6 por lo visto no puedo hacer eso ni desde un depurador injertando el codigo a mano ya que no aparecen referencias para esas funciones y si pongo los calls a fuego, por ejemplo un "call LoadLibrary", solo funcionaria en mi maquina. ¿De que manera puedo hacer eso en un binario de VB?

Se me olvido decir que en la Import Table no hay referencia a Kernel32.dll por lo que no está en la carga inicial y no se tiene acceso a sus funciones.

He estado fuera de casa en estos días y no he podido contestar.

No deberías tener problemas para inyectar una dll en cualquier proceso que corra en windows, siempre que respetes la compilación en 32bits ó 64 bits, según sea el caso. Aquí tienes una forma de hacerlo. Es independiente del lenguaje original, por lo tanto es igual que el binario provenga de BV u otro.

El hecho de que ciertas APIs no figuren en la IAT del proceso a inyectar, no quiere decir que no las puedas usar. Todo proceso carga Kernel32.dll, para más curiosidad revisa esto: Shellcode en C compatible con distintas inyecciones

Saludos.

al final lo hice de otra manera. Como la aplicacion corre dentro de un loader debugger, lo que hago es usar VirtualAllocEx y solicito memoria para copiar las funciones de la dll. Luego pongo unos bps donde deseo y desde esas zonas injerto los push necesarios, el call correspondiente y el retn. De todos modos me interesa mucho tu codigo pero tengo una duda. En xp si en un pc llamas a una api, siempre obtendrás el mismo hmodule pero, segun tengo entendido, a partir de Vista ya no es asi y puede cambiar entre ejecuciones y veo que LoadLibrary lo obtienes en tu proceso ¿No daria problemas en Vista/7/8?

Las inyecciones en win32 sea WinXP, Vista, Win7 o Win8 funcionan localizando la API LoadLibrary, o cualquiera desde el proceso inyector. Pero tienes razón en que MS$ puede cambiar la política de la localización de las direcciones de la API. Para solventar el problema, realicé este ejemplo de shellcode que localiza el BaseAddress de kernel32.dll. Seoane lo hizo de esta otra manera. Así conoceremos las direcciones de las API desde el mismo proceso anfitrión, y no desde el inyector.


Saludos.

claro,lo que varia es la posicion base donde se carga la dll pero si puedes ejecutar esas funciones desde el anfitrion pues resuelves el problema. Ahora mismo estoy encamado con fiebre pero cuando me encuentre mejor los miro con mas detenimiento ya que en delphi no me entero mucho. Otra cosa amigo, si uso VirtualAllocEx, cuando se cierra la aplicacion a la que le he asignado la memoria ¿Se libera sola la memoria o tengo que hacerlo yo a mano con VirtualFreeEx? Segun veo con Cheat engine, cuando se cierra la aplicacion la memoria se vuelve inaccesible pero no lo tengo claro.

Lo suyo y lo limpio es liberar la memoria cuando ya no la quieres.

Saludos.

Bueno, al final lo que estaba haciendo no me iba bien del todo ya que en unas funciones de la dll funcionaba y en otras crasheaba creo que porque como solo copio las funciones pues al ejecutarse supongo que buscaba alguna cosa de la dll y booom.
Lo estoy intentando pasar todo para usarlo con lo que pusiste y de momento para cargar la dll tengo esto:
Como corre dentro de un depurador, tengo metodos para obtener la direccion de las apis dentro del proceso y otras cosas mas.
El problema que tengo es que se queda congelado en el WaitForSingleObject aunque si lo miro con el Cheat Engine puedo ver como se ha creado el hilo. ¿que puedo hacer para solucionar eso?

Probablemente es un problema en el depurador, intenta esto:

Saludos.

lo he solucionando injertando en el oep el push y el call loadlibrary y en la siguiente linea pongo un bp. Arranco y cuando para en el bp ya tengo la dll cargada asi que restauro los bytes originales, quito el bp y posiciono a eip en el oep y ya corre con la dll. De todos modos mañana probaré lo que me indicas a ver que pasa.

una cosa, al estar parado en un evento, al ejecutar el codigo anterior creo que no tendria efecto hasta que arranque ¿No? Se supone que el codigo lo ejecuto dentro del evento y mientras tanto el proceso se congela y con el todos sus hilos. Entonces si es asi el nuevo hilo estaria congelado con lo cual no se ejecutaria hasta que salga del evento ¿No? El hilo aparecia como creado con lo que se me ocurre poner un bp en la siguiente linea y en ese evento poner el waitforsingleobject. De todos modos el modo que uso ahora mismo funciona aunque es algo chapuzas pero bueno.

Exacto, por eso quité el WaitForSingleObject.

Saludos.

Amigo como me indicas tengo un inconveniente.
Justo despues de cargar la dll tengo que obtener una serie de punteros a las funciones de la dll y si no pongo el WaitForSingleObject no funciona.
Como yo lo hago si funciona porque como se ejecuta el LoadLibrary y luego paro en la siguiente linea pues ya puedo obtener la info de la dll sin problemas.

En ese caso está claro que no puedes eliminar WaitForSingleObject, pero no pongas un bp en esa línea de código ni depures el thread que se crea para cargar la dll.


Saludos.

La clase que creamos se usa para depurar un proceso y si paras en un evento se detiene tanto el hilo principal como todos sus hilos. ¿Como hago para que estando en el evento reanudar uno de sus hilos? Con CreateRemoteThread creo que se obtenia el identificador del nuevo thread pero aunque le indiques que se ejecute al crearse se queda congelado y no se me ocurre nada para hacer que el nuevo hilo se ejecute. En OllyDbg hay un plugin que permite añadir o quitar un modulo pero no se como lo hace aunque te puedo decir que como mi ordenador va de pena de lento a veces se ve como cambia de zona y ejecuta un loadlibrary aunque lo hace tan rapido que ni se ve. Y luego vuelve al lugar donde estaba en el codigo.

Para después de la vuelta de WaitForSingleObject.

Saludos.

pues no se me ocurre como hacer eso ya que tendria que hacer la carga internamente y en el evento OnLoadDll de mi clase tendria que comprobar si la dll es la que intento cargar y el problema es que el hilo principal mientras tanto correria y no estaria parado.