Nuker-1
21 de Mayo del 2006

Hola necesito desde mi programa poder quitar dlls a otros programas, encontre este codigo pero no entiendo como indicarle que dll quitar y a que programa quitarsela
Muchas Gracias

'--------------------------------------------------------------
'Descargar una DLL o EXE que est茅 en memoria ( 6/Jul/97)
'
'Basado en un c贸digo de Bruce McKinney y que realiza la misma
'tarea que WPS.exe para descargar m贸dulos y ejecutables.
'(se supone)
'--------------------------------------------------------------
Option Explicit

Declare Function GetModuleHandle Lib "Kernel" (ByVal lpModuleName As String) As Integer
Declare Function GetModuleUsage Lib "Kernel" (ByVal hModule As Integer) As Integer
Declare Sub FreeModule Lib "Kernel" (ByVal hModule As Integer)

Public Sub Main()
Dim hModule As Integer

'El m贸dulo a librerar se pasa en la l铆nea de comandos
hModule = GetModuleHandle(Command$)
If hModule = 0 Then Exit Sub
'Libera todas copias de este m贸dulo
Do While GetModuleUsage(hModule) > 0
Call FreeModule(hModule)
Loop
End Sub