اخي بالنسبة الى الكود فهو من عندك وانا لااعرف كيف يعمل
انا فقط قمت بوضع فاصل زمني بين الضغطة والاخرى
شي أخر ذكرته لك في التعليقات لايعمل ال Await(Task.Delay(5000)) الا مع نت فريم ورك 4.5 فما فوق
جرب هاذا
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a = WebBrowser1.Document.All
For Each x As HtmlElement In a
If x.GetAttribute("ClassName") = "btn followe" Then
For i = 1 To 100 ' هنا تقدر تغير رقم 100 على حسب تكرار الزر
Threading.Thread.Sleep(3000)
x.InvokeMember("click")
Next
End If
Next
يمكن يعلق البرنامج لاكن هوا يضغط على الزر
تقدر تغير المية 100 بأي رقم
100 = يضغط على الزر 100 مرة الخ ...
انتظر الاجابة ...
(30-07-19, 10:25 PM)SnTnt كتب : [ -> ]جرب هاذا
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a = WebBrowser1.Document.All
For Each x As HtmlElement In a
If x.GetAttribute("ClassName") = "btn followe" Then
For i = 1 To 100 ' هنا تقدر تغير رقم 100 على حسب تكرار الزر
Threading.Thread.Sleep(3000)
x.InvokeMember("click")
Next
End If
Next
يمكن يعلق البرنامج لاكن هوا يضغط على الزر
تقدر تغير المية 100 بأي رقم
100 = يضغط على الزر 100 مرة الخ ...
انتظر الاجابة ...
اولا شكرا اخي لاهتمامك بالموضوع
ولكن للاسف لم يعمل ... للاسف قام بالضغط علي جميع الازرار بدون انتظار الفاصل الزمني