[salahmax12]

(06-05-16, 02:49 AM)myalsailamy كتب : شغلتها ليست بالهينه و لكن ليست مستحيله و هي عند عملية اي post في الصفحه يتم اخذ نسخه document من اكواد الصفحه html و بعدها تبحث عن element الخاص بالباسورد وهو عباره عن input type = password .. الان لما تتحمل الصفحه تسوي العكس بدل ما تاخذ تصير تسوي inner value لل input طبعا حاولت اكتب لك المصطلحات بالانجليزي عشان اذا بغيت تتوسع من كلامي تبحث بهذي المفاتيح

---

او نفس حل الاخ سعود بال كوكيز لاني كنت افكر بها قبل ما ارد بس ما كنت متاكد و للامانه تعتبر اسهل لك لو اشتغلت

انا اللي فهمته انه لازم اول حاجة اخذ نسخة من اكواد ال HTML الخاصة بال Decument اللي راح يفتحه المستخدم
و بعدها ابحث من بينها عن ال سطر الخاص بالباسورد و بعدين تنحفظ
و لمن يدخل المستخدم نفس الصفحة اسوي عكس  الموضوع
بحيث ان اكواد ال HTML الخاصة بالصفحة اثناء وجود الباسورد ترجع للصفحة و الباسورد اللي كتبها المستخدم تنكتب
ـــ
هذا اللي فهمته - فهل هذا ما تقصده ؟
و شكرآ لكم جميعآ
تعديل : 
لو هذا اللي تقصده انا سويت ذي الاكواد لكن لمن اسوي debug للبرنامج يسوي لي رسالة null error

PHP كود :

  Private Sub ToolStripButton16_Click(sender As Object, e As EventArgs) Handles ToolStripButton16.Click
            For Each ele As HtmlElement In WebBrowser1.Document.All
                For Each item In My.Settings.RememberPass
                    If ele.GetAttribute("id").ToLower = item.ToLower Then
                    Dim Password As String = InputBox("Please enter your password here (Right Now This Is The BetaVersion of This Future If you Don't Trust Us you can close this messege)")
                    My.Settings.MSPass.Add(Password & WebBrowser1.Url.ToString)
                    End If
                Next
            Next
    End Sub

    Private Sub ToolStripButton17_Click(sender As Object, e As EventArgs) Handles ToolStripButton17.Click
        If My.Settings.MSPass.Contains(WebBrowser1.Url.ToString) Then
            For Each ele As HtmlElement In WebBrowser1.Document.All
                For Each item In My.Settings.RememberPass
                    If ele.GetAttribute("id").ToLower = item.ToLower Then
                        Dim Password As String = My.Settings.MSPass.ToString.Remove(WebBrowser1.Url.ToString)
                        ele.SetAttribute("value", Password)
                    End If
                Next
            Next
        End If
    End Sub