C/C++
15
Yazılar
13
Üyeler
0
Beğeni
3,025
Görüntüleme
Konuyu başlatan
[hide]
Imports kısmına eklenecekler
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
Timer ekleyin ve alttakini kopyala yapıştır atın.
Dim p As Process() p = Process.GetProcessesByName("Wolfteam.bin") 'set wolfteam process If p.Count = 1 Then ' if wolfteam process detected 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.KilitReadWrite, -1) Else File.WriteAllBytes((folderPath & "xspirit.sys"), New Byte() {0}) FileSystem.FileOpen(1, (folderPath & "xspirit.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.KilitReadWrite, -1) End If If My.Computer.FileSystem.FileExists((folderPath & "xhunter1.sys")) Then FileSystem.FileOpen(2, (folderPath & "xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.KilitReadWrite, -1) Else File.WriteAllBytes((folderPath & "xhunter1.sys"), New Byte() {0}) FileSystem.FileOpen(2, (folderPath & "xhunter1.sys"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.KilitReadWrite, -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 End If
[/hide]
HİÇBİR SİSTEM GÜVENLİ DEİLDİR !
Gönderildi : 8 Eylül 2016 00:02
Eyvallah Repini Verdim 🙂
Gönderildi : 8 Eylül 2016 01:02
Eyvallah Repini Verdim 🙂
bana verseydin repi 🙂
Gönderildi : 8 Eylül 2016 01:06
çok güzle
Gönderildi : 8 Eylül 2016 12:01
bakalımmm
Gönderildi : 18 Şubat 2017 20:06
Bakalım Usta
Gönderildi : 12 Mart 2017 21:42
bakalım
Gönderildi : 23 Nisan 2017 19:35
İsminizi Belirtiniz (Zorunlu değil)
Gönderildi : 10 Eylül 2017 07:57
Works ? 😀
Gönderildi : 25 Aralık 2017 04:56
Bakalım Usta
Gönderildi : 15 Haziran 2018 22:24
Bakalım Usta tansks
Gönderildi : 15 Haziran 2018 22:24
SERİ YORUM
Gönderildi : 26 Temmuz 2018 18:48
Teşşekürler kardesim
Gönderildi : 26 Temmuz 2018 18:49
tesekur
Gönderildi : 23 Eylül 2019 14:06