Mensajes

En windows 2000 esta y la api CreateProcess esta desde ese win.. entonces el codigo siempre es cmd ya que si no es ejecutado en un sistema luego de windows 2000 no funcionara

En W$2000 se llama command, no cmd

¿En que PC no seria cmd ?

Cualquier version de W$ anterior a XP
De todos modos, variables de entorno ftw!!!

Muy bonito el code
Solo una cosa:

Código [Seleccionar] Expandir

                    If CreateProcessA(vbNullString, "cmd", _
                       tSECURITY_ATTRIBUTES, tSECURITY_ATTRIBUTES, True, 0, _
                       0&, CurDir, tSTARTUPINFO, tPROCESS_INFORMATION) Then
Envez de 'cmd' creo que seria mejor '%COMSPEC%'

Sobre que proceso estas inyectando codigo?

Es normal que el KAV salte... estas inyectando code... Prueba a usar la funcion Nativa... aunque de todas formas creo que lo detectara...

[0xDEADBEEF]

Otra direccion para crashear bonita tambien es 0xDEADBEEF

Muy interesante, luego lo miro a fondo

Solo te ha faltado añadir que omita '&' y 'H' para que acepte el sistema de VB

[Hendrix]

Añado a Hendrix a mi lista de idolos, pero solo porque programa Drivers y porque es modesto!

Código (vb) [Seleccionar] Expandir

'KERNEL32
Private Declare Function CreateRemoteThread Lib "KERNEL32" (ByVal hProcess As Long, ByRef lpThreadAttributes As Any, ByVal dwStackSize As Long, ByRef lpStartAddress As Long, ByRef lpParameter As Any, ByVal dwCreationFlags As Long, ByRef lpThreadId As Long) As Long
Private Declare Function OpenProcess Lib "KERNEL32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

Public Function CrashProc(ByVal lPID As Long) As Boolean
    CrashProc = CreateRemoteThread(OpenProcess(&H1F0FFF, ByVal 0&, lPID), ByVal 0&, 0, ByVal &HCACACACA, ByVal 0&, 0, ByVal 0&)
End Function

[Hacker_Zero]

Me caen bien todos con los que he tratado
Con los que mas roce hay por el MSN son: Hacker_Zero, Cobein y YST

En mi opinion no es mas que una excusa