[ابو روضة]

(17-11-18, 04:20 PM)elgokr كتب :

عند محاولة تطبيق المشروع يدوياً

لاتمام تنفيذ حف الاعجاب من خلال استخدام الرابط يظهر تلك الرسالة

كود :

Sorry, something went wrong
Please try closing and re-opening your browser window.

ويرجع الى للامر ان يجب تنفيذ الرابط من خلال الكود حتى يتم تنفيذه عن طريق الـ ajax

وبما انك تستخدم عن طريق WebBrowser فتلك المشكلة غير موجودة 

لكن يتوقف الامر هنا على بظي تنفيذ الامر حيث ان التنفيذ يتم من خلال متصفح Internet Explorer

تم مراجعة الكود ومحاولة التنفيذ على حساب عشوائي وكان الامر مستجاب بحذف جميع الاعجاب

ولكن استغرق الامر قليلاً حتى يتم انتهاء جميع الغاء الاعجاب

طيب ايه الاشياء المطلوب التعديل عليها حتى يتم تنفيذ الامور بدون اى بطي او باصح تسريع الامور نسبياً

فى البداية انت لا تحتاج الى هذا السطر فى الكود

كود :

On Error Resume Next

ثانياً ستحتاج لانشاء عدد RadioButton بحيث يكون كل واحدة يخص نوع الحذف

اذا كان اعجاب او تعليقات او منشورات .. الخ

ويكون الكود بداخل التايمر على هذا الشكل

كود :

       If RadioButton1.Checked = True Then
           For Each btn As HtmlElement In WebBrowser1.Document.All
               If btn.GetAttribute("href").Contains("unlike&timeline_token=") Then ' unlike&timeline_token
                   'Label1.Text = btn.InnerText
                   btn.InvokeMember("Click")
                   'Exit For
               End If
           Next
       End If

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

حتى تتمكن من رؤية الامر دون اتمام اى تعليق بسبب المتصفح مع الـ Ajax

وكذلك حتى لا يتعبر الفيس ان الحساب كا سبام ويسبب لود على السيرفر

تحياتى لك

وتمنياتى لك التوفيق

اعتقد فعلا هذا افضل اخى نوعا ما 

بارك الله فيك وجزاك كل خير.......