Código: Seleccionar todo
Dim bCode() as byte
Open Path for binary access read as #1
Redim bCode(LOF(1) - 1)
Get #1,, bCode()
close #1
bCode = EncrypByte(bCode(), Pass)Saludos!
Para abrir un archivo, si utilizais RC4, estais aciendo conversiones tontas...
y para lo de las apis... estoy trabajando en un proyecto, como el AvFucker pero de APIs jeje
Saludos!
Saludos!
github.com/Slek-Z
