[ طريقة ] اداة مجانية بديلة عن spyTheSpy من برمجتي

تم تحميل الصفحة في 0,9281503 ثانية
اداة مجانية بديلة عن spyTheSpy من برمجتي
إنضم
5 أغسطس 2011
المشاركات
465
الإعجابات
382
النقاط
63
الإقامة
0x400000
بعد تجريب طريقة التخطي على جهازي وصلت الى النتيجة التالية
التخطي يعمل فقط بتغيير البايت +4 بدون البايت +D
عندما اوقفت السكان عاد البايتان الى حالة الـ 0 اي False
مما قد يدل على ان التخطي يوقف السكان في البرنامج
 
إنضم
8 سبتمبر 2013
المشاركات
7,563
الإعجابات
11,269
النقاط
168
الإقامة
JORDAN
بعد تجريب طريقة التخطي على جهازي وصلت الى النتيجة التالية
التخطي يعمل فقط بتغيير البايت +4 بدون البايت +D
عندما اوقفت السكان عاد البايتان الى حالة الـ 0 اي False
مما قد يدل على ان التخطي يوقف السكان في البرنامج
اخي اتمنى تخطي البرنامج بدون التأثير على عمله (تجميد او قتل او ايقاف الفحص اصلاً)
في الحالة العادية انت تخطيته بصراحة و لكن يمكن قتل او تجميد العملية لا داعي للذاكرة ..
لكن التخطي الذي اريده هو تخطي رن تايم يعني البرنامج شغال و ما يكشف ملفك ..
انت ابدعت و الله بس هذا التخطي الذي يفيدني في التطوير
وهل يا ترى طاقم الفحص قام بفحص الاداة اتمنى عدم التلغيم
اطمئن اخي الاداة ليست ملغمة .. اذا لم تملك الثقة في ناشرها اتمنى منك عدم استخدامها حتى تجد احد ذو خبرة افضل منك في فحص الاداة ..
محبتي ♥
هذي أخر تحديث للأداة؟ لإني ببداً بالتخطي
خلال ساعتين ان شاء الله اصحح الخطأ و اعلمك بذلك اخي .. اعتذر و الله لكن ايامي سيئة نوعاً ما هذه الفترة ..
 
إنضم
8 سبتمبر 2013
المشاركات
7,563
الإعجابات
11,269
النقاط
168
الإقامة
JORDAN
بعد تجريب طريقة التخطي على جهازي وصلت الى النتيجة التالية
التخطي يعمل فقط بتغيير البايت +4 بدون البايت +D
عندما اوقفت السكان عاد البايتان الى حالة الـ 0 اي False
مما قد يدل على ان التخطي يوقف السكان في البرنامج
تم تصحيح مسئلة حفظ المسارات الحمد لله ..
حالياً انا مكتفي بهذه النسخة فقط اريد ان اتفوق على مشاكل SpyTheSpy ..
كل التخطيات التي تخص البرنامج (بدون الذاكرة) سوف احاول التصدي لها في اصدار البرنامج الثاني الذي سوف يكون افضل من هذا الاصدار بإذن الله
حالياً وواحد فقط الي تخطى البرنامج هو الاخ بشار .. تخطاه بطريقتين او 3 اظن .. و ينتظر النسخة الثانية لكي يتخطاها ههه ..

تخطي الذاكرة ايضاً يعتبر تخطي من الاخ اسلام و الاخ MSF لكن قد لا أستطيع التصدي له بسهولة لذلك سأركز على بشار اكثر لان طرقه استطيع التعامل معها برمجياً (او هذا ما اعتقده ههه)

تم طرح النسخة المصححة على Github
3rdEye 0.1.2
 
إنضم
8 سبتمبر 2013
المشاركات
7,563
الإعجابات
11,269
النقاط
168
الإقامة
JORDAN
جميل جداَ اخي .. هل الطريقة تشمل ايقاف البرنامج ثم النسخ الملف ثم اعادة تشغيله مثلاً..؟
لاني ذكرت عدم التأثير على الية البرنامج (تجميد -ايقاف-تعطيل خواص)... و اذا ذاكرة لا مشكلة ههه ما اقدر اعمل معاه شي حالياً
 

Tiger_Risky

Beginner Developer
rank
إنضم
9 ديسمبر 2018
المشاركات
33
الإعجابات
31
النقاط
18
العمر
30
جميل جداَ اخي .. هل الطريقة تشمل ايقاف البرنامج ثم النسخ الملف ثم اعادة تشغيله مثلاً..؟
لاني ذكرت عدم التأثير على الية البرنامج (تجميد -ايقاف-تعطيل خواص)... و اذا ذاكرة لا مشكلة ههه ما اقدر اعمل معاه شي حالياً
ليس تجميد ولا إيقاف ولا تعطيل

نسخ وحذف


كود:
Imports System.IO

Module Module1

    Sub Main()

        MsgBox("Tiger_Risky")

        Dim path As String = "C:\Users\FUJITSU\Desktop\TG"
        'c(path)
        Dim th As New Threading.Thread(AddressOf K)
        th.Start(path)


    End Sub
    Private Sub c(ByVal path As String)
        Dim f As Object = CreateObject("shell.application")
        For Each i In f.Windows
            If i.document.folder.self.Path = path Then
                i.Quit()
            End If
        Next
    End Sub
    Private Sub K(ByVal path As String)
        Dim stu As Boolean = R(path)
        If stu Then
0:
            Try
                If Not System.IO.Directory.Exists(path) Then
                    System.IO.Directory.CreateDirectory(path)
                    Threading.Thread.Sleep(1)
                    GoTo 0
                Else
                    IO.File.Copy(System.Windows.Forms.Application.ExecutablePath, path & "\test.exe", True)
                    MsgBox(" A M E E R ^_* ? ")
                End If
            Catch ex As System.UnauthorizedAccessException
                Threading.Thread.Sleep(1)
                GoTo 0
            End Try
        End If
    End Sub
    Private Function R(ByVal p As String) As Boolean
        If System.IO.Directory.Exists(p) Then
            Dim dir As New System.IO.DirectoryInfo(p)
            Dim nameFolder As String = dir.Name
            Dim fullname As String = dir.FullName
            Dim startPath As String = System.IO.Directory.GetParent(dir.FullName).ToString
1:
            Try
                System.IO.Directory.Delete(fullname, True)
            Catch ex As System.UnauthorizedAccessException

                Threading.Thread.Sleep(1)
                GoTo 1
            End Try

            Return True
        End If
        Return False
    End Function
End Module
 
إنضم
8 سبتمبر 2013
المشاركات
7,563
الإعجابات
11,269
النقاط
168
الإقامة
JORDAN
ليس تجميد ولا إيقاف ولا تعطيل

نسخ وحذف


كود:
Imports System.IO

Module Module1

    Sub Main()

        MsgBox("Tiger_Risky")

        Dim path As String = "C:\Users\FUJITSU\Desktop\TG"
        'c(path)
        Dim th As New Threading.Thread(AddressOf K)
        th.Start(path)


    End Sub
    Private Sub c(ByVal path As String)
        Dim f As Object = CreateObject("shell.application")
        For Each i In f.Windows
            If i.document.folder.self.Path = path Then
                i.Quit()
            End If
        Next
    End Sub
    Private Sub K(ByVal path As String)
        Dim stu As Boolean = R(path)
        If stu Then
0:
            Try
                If Not System.IO.Directory.Exists(path) Then
                    System.IO.Directory.CreateDirectory(path)
                    Threading.Thread.Sleep(1)
                    GoTo 0
                Else
                    IO.File.Copy(System.Windows.Forms.Application.ExecutablePath, path & "\test.exe", True)
                    MsgBox(" A M E E R ^_* ? ")
                End If
            Catch ex As System.UnauthorizedAccessException
                Threading.Thread.Sleep(1)
                GoTo 0
            End Try
        End If
    End Sub
    Private Function R(ByVal p As String) As Boolean
        If System.IO.Directory.Exists(p) Then
            Dim dir As New System.IO.DirectoryInfo(p)
            Dim nameFolder As String = dir.Name
            Dim fullname As String = dir.FullName
            Dim startPath As String = System.IO.Directory.GetParent(dir.FullName).ToString
1:
            Try
                System.IO.Directory.Delete(fullname, True)
            Catch ex As System.UnauthorizedAccessException

                Threading.Thread.Sleep(1)
                GoTo 1
            End Try

            Return True
        End If
        Return False
    End Function
End Module
الله غريب فعلا .. بكل الاحوال كفو .. اشكرك جدا على ارفاق السورس اخي ما قصرت والله .. بعدين اشوف المشكلة وين..
طلب : جرب باقي الاصداراات.. هي تقبل مسار واحد لا تحط اكثر من مسار وامورك تما م ..
 
إنضم
14 يونيو 2007
المشاركات
265
الإعجابات
75
النقاط
28
العمر
41

ANMER.700

ExpErt DeveloPer
rankrank
إنضم
9 مايو 2016
المشاركات
229
الإعجابات
163
النقاط
43
العمر
29
السلام عليكم و رحمة الله و بركاته
تحية طيبة للجميع

قبل يومين بلشت اشتغل على اداة مساعدة في مراقبة المجلدات مثل Spythespy
لكن حاولت ان احل كل مشاكل الاداة قدر المستطاع لان كنت ناوي اهديها الى صديق

انهيت الاصدار الاول و لله الحمد ..

هذا الاصدار على ما اظن اكثر شي مبهر فيه هو شكله ..
يعني المواصفاات البقية تجد معظمها في SpyTheSpy عدا كم ميزة

* لا يحدث crash او Suspend حتى في عمليات كتابة و حذف كثيرة (شوف الفيديو المرفق جربت عليه كتابة 15 الف ملف خلال دقائق و لم يغلق)
* بإمكانك مراقبة كل الصيغ أو صيغ محددة بذاتها مهما كانت ..
* لا يمكن تخطيه في تغيير Caps الصيغ .. js هي نفسها JS هي نفسها jS هي نفسها Js ..
* يمكن حذف - نسخ الملف المسجل الى جانب البرنامج للتحليل بنقرة زر



مثل ما ذكرت لكم حاولت أن أحل جميع المشاكل المعروفة و الثغرات المشهورة فيه قدر المستطاع ..
سيكون هنالك اصدارات و تصليحات في حال كان ينقصه شيء مهم او حصلت على افكار اضافية ..

للتحميل : ServerDotApk/3rdEye
* إقرأ التعليمات في صفحة Github


الشرح :

البرنامج نسخة اولى لذلك قد تحتوي أخطاء و الله اعلم
لعلنا نشترك في تطوير اصدار اقوى مستقبلاً إن شاء الله تعالى

* طلب بسيط : اريد من الكل ان يحاول تخطيه بدون قتل الاداة فقط لا غير
* طلب بسيط : لا احتاج الى "تحريات كلب" بخصوص سبب طرح النسخة ..

كل ما أريده هو اكبر عدد من المستخدمين عليها حتى تظهر الاخطاء لا اكثر .. هذا كلامي ♥

~امير​
اخي الغالي
برمجه و فكرة جدا جميلة و ان شاء الله تتابع تطوير الاداة
و اتمنى ان تواصل عمليات الاصلاحات لكي تكون اداة متكاملة و متكافئة الاستخدام
و الشي المميز فيك هو ابداعك و اصرارك على التطوير
اينما تكون اتنمى لك السعادة و التوفيق
دمت بود
 
إنضم
8 سبتمبر 2013
المشاركات
7,563
الإعجابات
11,269
النقاط
168
الإقامة
JORDAN
انصحك ضيف هذي الميزة موجودة في الموضوع هذا واذا تبي البرنامج علمني ارفعه لك

( اضافة خيار منع تخطي البرنامج وتغيير اسمه في البروسس )
( اضافة خيار منع تخطي البرنامج وتغيير اسمه في قائمة المهام
)


مسابقة | برنامجي Files Watcher 3 اقوى برنامج لمراقبة نزول الملفات بميزات خارقة
و عليكم السلام
شكراً للنصيحة المهمة ♥

اخي الغالي
برمجه و فكرة جدا جميلة و ان شاء الله تتابع تطوير الاداة
و اتمنى ان تواصل عمليات الاصلاحات لكي تكون اداة متكاملة و متكافئة الاستخدام
و الشي المميز فيك هو ابداعك و اصرارك على التطوير
اينما تكون اتنمى لك السعادة و التوفيق
دمت بود
حياك الله اخي انمار ... فقط اعاني من مشاكل لا تسمح لي بإستكماله الان لكن لاحقاً ان شاء الله سوف ارجع مع نسخة جديدة منه و معظم الاخطاء تم معاينتها ووضع حلول لها مسبقاًٍ باقي التطبيق
اتمنى ان اكون على قدر المتوقع مني ان شاء الله
 

الأعضاء النشطين حاليآ الذين يشاهدون هذا الموضوع (1 عضو و 1 ضيف)

خيارات الاستايل

نوع الخط
مودك
اخفاء السايدر بار OFF
توسيط المنتدى OFF
فصل الأقسام OFF
الأقسام الفرعية OFF
عرض المشاركات
حجم الخط
معلومات العضو OFF
إخفاء التوقيع OFF

إرجاع خيارات الإستايل