VB.net obj hkk.

TheGodFatheR' Alıntı:

Sorunu Çözdünmü Hala Yardım İstiyormusun ?

Genişletmek için tıklayın ...

TheGodFatheR' Alıntı:

Kardeşim Obj çekmen için Bypass yapman lazım bypass yapması çok kolay ilk önce herhangi bir yere button koy tekrardan adını bypass yap  ben sana şimdi 2 tane kod verecem bu kodları dediğimm yerlere yapıştır  Yardım edebildiysem repi unutma 

Bu Kodu Public Class Form 1 in üstüne Yani Bütün Herşeyin Üstüne En Üste Yapıştır ​

PHP:

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

Bunuda Bypass diye button açtınya ona çift tıkla yapıştır ​

PHP:

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)
                ReactorTextBox1.Text = ("Erişim Engellendi ")
            End If
            If My.Computer.FileSystem.FileExists((folderPath & "wolftü.bin\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)

            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

Olay bittiii Yalnız Hileyi Açınca İlk csh yerine bypassa bas soonra csh ve bine bas ​

Genişletmek için tıklayın ...

TheGodFatheR' Alıntı:

label ekleme  
gerek yok labele Ekrana bypass aktif diye yazaı çıkacak tmm de olur

Sen Sadece Dediklerimi Yap Bnm Yeter

Genişletmek için tıklayın ...

TheGodFatheR' Alıntı:

OBJ HILELERINE OBJ TEXT GEREKMIYOR ONERDEN CIKTI  HA AYIRMAK İSTİYOSAN GRUP BOXLA AYIR SANA KALMIŞ

Genişletmek için tıklayın ...

MertReizYt' Alıntı:

TEK ATMA OLE OLMAZ KARDESM ENVANTER HACK GIBI KODLICN

Genişletmek için tıklayın ...