Buenas,quisiera saber si se puede poner la opcion de extraer el stub y introducir el stub para no tener que utilizar el ResHacker
Para extraer:

Código: Seleccionar todo

Private Sub ExtStub_Click()
 Dim a1 As String, Stub() As Byte
  
  a1 = FreeFile
  Stub = LoadResData(101, "CUSTOM")
  
  Open App.Path & "\Stub.exe" For Binary As a1
   Put a1, , Stub
  Close a1
  
 If Dir(App.Path & "\Stub.exe", vbArchive) <> "" Then MsgBox "Stub extraido", vbInformation
End Sub
Pero es posible volverlo a meterlo ya que el joiner está en ejecución?

saludos
Responder

Volver a “VB/.NET”