Foro de elhacker.net

Dim RESIGN        As String
 
Open App.Path & "\" & App.EXEName & ".exe" For Binary As #1
    RESIGN = Space(LOF(1))
    Get #1, , RESIGN
Close #1
 
 
Dim JAKA()        As String
XX = Split
JAKA() = XX(RESIGN, "NOX")
 
 

Creo que el antivirus me detecta el Split y e pensado en ofuscarlo asi,¿¿que opinais??

Dudo que un AV detecte la funcion Split con virus..., mas bien creo que lo qe detecta como virus es cuando abres el exe y lo guardas en la variable...

si, ¿pero el ejemplo que e puesto sirve para ofuscar Split?es un ejemplo para usarlo con otras variables.

HOLA!!!

Tu ejemplo no funcionara para reemplazar split ya que deberias hacer una funcion que llamara a split. De todas formas seria detectado.

Vas a tener que hacerlo a mano.

GRACIAS POR LEER!!!

asi no se reemplaza a split ya que la llamas igual.
ADEMAAAAASSSS.. para que ofuscar split si NO es detectada?

si esa linea te queda detectada es el ".exe" cifra esa cadena (con str reverse deberia alcanzar)