Wolftü Bypass Source (VB.NET)


Memory Mezarlığı    Forumda Gereksiz Bulanan veya Artık İşlevi Olmayan Konuların Taşındığı Kategori ( Bi Fatiha Okumadan Geçmeyiniz :) )

Yazar: ErdemMH    1 Yorum    948 Görüntüleme
  • Derecelendirme: 0/5 - 0 oy
Konu Kapalı

Paylaşım Tarihi: 30.01.2016, 16:17:57 #1
ErdemMH .
Süper Üye
Status: Çevrimdışı Yorumları:649 Konuları:123 Kayıt Tarihi:10.12.2015 Rep Puanı: 224

Bypass Kod  2 Şekilde Kodlanır

1-)Timer Yapıp Enabled Bölümünü True Yazıp İçine Şu Kodları Yazarak Oto Aktif Oluyor Bypass
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

Ve Formun EN Üzerüne Form 1 Yazan En Üstteki Bölümün Üzerine Bu Kodlar Yazılcaktır!!

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

2-) Buton Yoluyla Kodlama Buton İçine  Aynı Kodları Yazarak Xincode Dolarken Basmaktır.
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

Forumun En Üzerüne Form1 yazan Yazınında Üzerine Bu KOD YAZILCAKTIR!!
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
#Alıntı
Son Düzenleme: 30.01.2016, 16:20:42, Düzenleyen: ErdemMH.

Kullanıcı İmzası
Resim http://49.media.tumblr.com/a410c087590891fc6b1a319ada18acba/tumblr_mwh8fc9NX81s0twoeo1_r3_400.gif

Resim http://i.hizliresim.com/L15Y7b.jpg

Paylaşım Tarihi: 30.01.2016, 16:19:17 #2
SLayeRTR Cezalı Üye
Cezalı Üye
Status: Çevrimdışı Yorumları:52 Konuları:4 Kayıt Tarihi:29.01.2016

Abi sağolda niye alıntı olduğunu yazmiyosunuz neyse sağol birde modaratörlerden biri açmış zati konu.




Konu Kapalı






Aradığınızı Bulamadınız Mı ?
 bypass

Konuyu Okuyanlar:
1 Ziyaretçi