30-07-19, 05:18 PM
اخي تفضل الكود خاصتك مضاف اليه تأخير 5 ثانية بين كل ضغطة
كود :
Dim a = WebBrowser1.Document.all
For Each x As HtmlElement In a
If x.GetAttribute("ClassName") = "btn followe" Then
x.InvokeMember("click")
End If
' هنا الفاصل الزمني
'يعمل مع نت فريم ورك 4.5 فما فوق
Await(Task.Delay(5000)) ' فاصل 5 ثوان
Nextاعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات
