- Konuyu başlatan
- Yasaklandı
- #21
Haklısın aga bunlara yaranılmaz kendileri bulsun herşeyi yapabiliyorlarsa yapsınlarşaka gibi ya pointer diye dileniyorsunuz şimdide artislik yapıyorsunuz ama suç sizde degil paylaşanda ben her zaman söylüyorum
Haklısın aga bunlara yaranılmaz kendileri bulsun herşeyi yapabiliyorlarsa yapsınlarşaka gibi ya pointer diye dileniyorsunuz şimdide artislik yapıyorsunuz ama suç sizde degil paylaşanda ben her zaman söylüyorum
Alıntıysa alıntıdır forumda varmı ?benim dilendiğimi ne zaman gördün
Knk bunlar herşeyi biliyorlardır eminim afsafsafadgenel konuştum isim vermedim neyse BUYUKSUNUZ siz yaparsınız
yaparlar onlar kalabalık adamları varKnk bunlar herşeyi biliyorlardır eminim afsafsafad![]()
Bizde kalabalığızyaparlar onlar kalabalık adamları var
Detaylı anlatım bu varDetaylı Anlatan Yokmu ?
TeşekkürlerTabiki Bunlar İçin Bypass Lazım Olucaktır Alın Size Güncel Bypass
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
Üst Kısım
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)
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)
End If
If My.Computer.FileSystem.FileExists((folderPath & "\xigncode")) Then
End If
FileSystem.FileOpen(1, (folderPath & "\xigncode"), OpenMode.Append, OpenAccess.ReadWrite, OpenShare.LockReadWrite, -1)
Catch ex As Exception
End Try
Teşekkürler
Rica ederimÇok yararlı bir konu olmuş thanks![]()
Rica ederim
Rica ederimYararlı konu.Teşekkürler.