wolftü Kendi Kodladıgım Hile Çalısmıyor Help

Try

            Dim folderPath As String = Environment.GetFolderPath(SpecialFolder.Windows)

            FileSystem.FileClose(New Integer() {1})

            FileSystem.FileClose(New Integer() {2})

            If My.Computer.FileSystem.FileExists((folderPath & "\xspirit.sys")) Then

                FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)



            Else

                File.WriteAllBytes((folderPath & "\xspirit.sys"), New Byte() {0})

                FileSystem.FileOpen(1, (folderPath & "\xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)

                Label4.Text = ("Erişim Engellendi ")

            End If

            If My.Computer.FileSystem.FileExists((folderPath & "\xhunter1.sys")) Then

                FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)



            Else

                File.WriteAllBytes((folderPath & "\xhunter1.sys"), New Byte() {0})

                FileSystem.FileOpen(2, (folderPath & "\xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)

                Label5.Text = ("Erişim Engellendi")

            End If

        Catch exception1 As Exception

            ProjectData.SetProjectError(exception1)

            Dim ex As Exception = exception1

            ProjectData.SetProjectError(ex)

            Dim exception As Exception = ex

            ProjectData.ClearProjectError()

            ProjectData.ClearProjectError()

        End Try

        Dim p As Process()

        p = Process.GetProcessesByName("wolftü.bin") 'set wolftü process

        If p.Count = 1 Then ' if wolftü process detected

            Label4.Text = ("XignCode Clear Başarılı")

            Label5.Text = ("XignCode Clear Başarılı")

End If



....................................................................................................





Imports Microsoft.VisualBasic

Imports Microsoft.VisualBasic.CompilerServices

Imports System

Imports System.Collections

Imports System.Collections.Generic

Imports System.ComponentModel

Imports System.Diagnostics

Imports System.Drawing

Imports System.IO

Imports System.Runtime.CompilerServices

Imports System.Windows.Forms

Imports System.Environment