13-01-20, 06:31 AM
(12-01-20, 11:45 PM)ابو روضة كتب :اتفضل أخى جرب هذا حين الدخول على اى صفحة تريد عمل متابعة لها بالويب براوزرمن هذا الصفحات https://mbasic.facebook.com/ليس www
كود :
Dim allBtns As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("a")
For Each btn As HtmlElement In allBtns
If btn.InnerText = "أدخل هنا اسم متابعة" Then
btn.InvokeMember("click")
End If
Next
شكرا لك اخي ومعلمي ولكن بمعني ايه (أدخل هنا اسم متابعة)
هل تقصد ادخل id الحساب ؟؟؟ لم افهم

