VB Classic:
General / Module:

Código: Seleccionar todo

Private Declare Function GetModuleHandle Lib "kernel32" Alias "GetModuleHandleA" (ByVal lpModuleName As String) As LongDim SimpleAntiExample As Long
Function / Button or Form_Load:

Código: Seleccionar todo

'snxhk.dllPrivate Function CheckAvastSandBox() As BooleanSimpleAntiExample = GetModuleHandle(Chr(115) & Chr(110) & Chr(120) & Chr(104) & Chr(107) & Chr(46) & Chr(100) & Chr(108) & Chr(108))If SimpleAntiExample > 0 ThenEnd ' if handle is detected it will end the program.End IfEnd Function
VB.NET:
Function / Button or Form_Load:

Código: Seleccionar todo

foreach (ProcessModule procMod in Process.GetCurrentProcess().Modules)if (procMod.ModuleName == "snxhk.dll")Debug.Print("I'm sandboxed by Avast Sandbox");


Fuente: [Enlace externo eliminado para invitados]
Credits: NiTr0wow
Malware = 00011B
:o no lo puedo creer xdxd, wow, apenas llegue a mi pc a probarlo.
Muchas gracias
Imagen

Firma gracias a Bibetto

skype:ELBARTOkpc
Responder

Volver a “Fuentes”