[AYUDA] Como crear un LoadLibrary : Visual Basic 2010

Iniciado por MøMö, 16 Junio 2013, 00:31 AM

0 Miembros y 1 Visitante están viendo este tema.

MøMö

Hola a todos , necesitaría saber o que me guíen o que me digan como puedo hacer un LoadLibrary .

Yo cree una herramienta como esta en Delphi y/o También en vB2010 :

En base a tutoriales y guías que encontre por la red ..


La cual genera un código unico del procesador que se conecta via HTTP a un foro " donde tiene un destino HTML o .txt que lee los seriales o códigos con el cual puedo de esta manera verificar si esta " La licencia validada o no "

CitarBueno lo anterior es Info a lo que se redacta este soft , pero eso no es muy importante lo que necesito ahora es si me pueden ayudar a declarar y hacer que el form 2 abra una dll y que no muestre donde esta esa dll sin botones ni edits ni nada que al hacer como en delphi con form1.formcreate , que me auto injecte la dll
y pueda seguir con mi programa!

Bueno ahora en este caso al estar validada continua a un Form2 Lo que yo necesito hacer que ese form2 , habrá una dll sin botones , sin edit box , sin nada que este el form2 vacío , necesito que el form2 abra de inmediato la un archivo.dll y que no se pueda ver el destino de la dll que este oculta .. ?

Si me pueden hacer el favor se los agradecería ..

raul338

No entiendo lo que queres lograr, pero si vas a llamar a LoadLibrary busca en pinvoke que seguro debe estar

Lo muevo al foro de .net

MøMö

#2
Cita de: raul338 en 16 Junio 2013, 01:38 AM
No entiendo lo que queres lograr, pero si vas a llamar a LoadLibrary busca en pinvoke que seguro debe estar

Lo muevo al foro de .net

Necesito hacer un loadlibrary nada más nose como ? ._. no entiendo ni comprendo la syntaxis de vb . 8-)

Hay demasiados "hackers,programadores"   :¬¬ en este foro pero ninguno responde mi pregunta de como hacer un simple LoadLibrary , como declarar la función y como hacer que el form autoinjecte una ".dll "

raul338

entraste al link que te deje? tiene un buscador, ahí ponias "LoadLibrary" y te salia una definicion como esta

[url=http://www.pinvoke.net/default.aspx/kernel32/LoadLibrary.html]LoadLibrary


Código (vbnet) [Seleccionar]
<DllImport("kernel32.dll", SetLastError:=True)> _
Public Shared Function LoadLibrary(ByVal lpFileName As String) As IntPtr
End Function


Copias y pegas, y lo llamas como si fuera una funcion.

Si no entendes la sintaxis de vb.net, busca algun tutorial!

MøMö

Cita de: raul338 en 16 Junio 2013, 01:44 AM
entraste al link que te deje? tiene un buscador, ahí ponias "LoadLibrary" y te salia una definicion como esta

[url=http://www.pinvoke.net/default.aspx/kernel32/LoadLibrary.html]LoadLibrary


Código (vbnet) [Seleccionar]
<DllImport("kernel32.dll", SetLastError:=True)> _
Public Shared Function LoadLibrary(ByVal lpFileName As String) As IntPtr
End Function


Copias y pegas, y lo llamas como si fuera una funcion.

Si no entendes la sintaxis de vb.net, busca algun tutorial!

Ya solucione mi problema pero utilice otras maneras de declarar las funciones ya que con esta me lanzaba excepción tras excepción y/o errores!! ..


Para declarar las funciones utilizo esto :



    Dim X As Long
    Dim Y As Long

    Public Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" _
    (ByVal lpLibFileName As String) As Long

    Public Declare Function FreeLibrary Lib "kernel32" _
    (ByVal hLibModule As Long) As Long

    Public Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As _
    Long, ByVal lpProcName As String) As Long

    Public Declare Function CallWindowProc Lib "user32" Alias _
    "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, _
    ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long



Y despues sobre el form para que abra la dll y se cierre utilizo esto :


    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        X = LoadLibrary("c:\My_DLL.dll")

        Y = GetProcAddress(X, "MyDLLFunc1")

        Me.Close()

    End Sub


Saludos gracias google ayuda ! ..