17-11-18, 04:20 PM
عند محاولة تطبيق المشروع يدوياً
لاتمام تنفيذ حف الاعجاب من خلال استخدام الرابط يظهر تلك الرسالة
كود :
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
وكذلك حتى لا يتعبر الفيس ان الحساب كا سبام ويسبب لود على السيرفر
تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

