Xingcode Log Çözümü [31.05.2018]

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Ultra Üye
Katılım
28 Ağu 2015
Mesajlar
1,054
Çözümler
1
Tepki puanı
245
Arkadaşlar bu paylaştığım hilelerde log yiyor gibi yorumlar atmayınız log yiyorsanız bu dediklerimi yapın log yemessiniz.
Bunca kişi kullanırkene siz neden kullanmayasanız ?
Benim size amacım yardımcı olmak ve bu soruyu soranlara log yiyor diye cevap verenlere dediklerimi yapın log yemessiniz.


Bilgisayarım/C/Windows/Prefecth Klasörünün İçini Sil
Bilgisayarım/C/Windows/Temp Sil Klasörünün İçini Sil
Bilgisayarım/C/Windows/xhunter.sys ve xscript.sys Sil
Çalıştıra gel recent yaz ve Klasörünün İçini Sil
Çalıştıra gel %temp% Klasörünün İçini Sil

Çalıştırcağınız hileyi xingcode dolarkene yönetici olarak çalıştırın.

:video:

 
Moderatörün son düzenlenenleri:
HADİ HOPPALARAAAAAAA
Banlı Üye
Katılım
20 Tem 2017
Mesajlar
1,333
Tepki puanı
248
İsticekse atayım burdan ?

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
 
HADİ HOPPALARAAAAAAA
Banlı Üye
Katılım
20 Tem 2017
Mesajlar
1,333
Tepki puanı
248
Ben genelde bunu yapıyorum ve işe yarıyor ama ne hikmetse senin hilelerinde yaramıyor bea :/
Benim verdiğim ile Kodlama Mantığnı Biliyorsan Bir Daha Log Almmassın
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
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst
  AdBlock Detected
Elbette, reklam engelleme yazılımı, reklamları engelleme konusunda harika bir iş çıkarır, ancak aynı zamanda web sitemizin bazı yararlı ve önemli özelliklerini de engeller. Mümkün olan en iyi site deneyimi için lütfen bir dakikanızı ayırarak AdBlocker'ınızı devre dışı bırakın.