[smalw]

هذا كود تسجيل الدخول ويعمل مع الرابط https://www.instagram.com/accounts/login

كود :

WebBrowser1.Document.GetElementsByTagName("input").GetElementsByName("username")(0).Focus()
SendKeys.Send(TextBox1.Text)
Application.DoEvents()

WebBrowser1.Document.GetElementsByTagName("input").GetElementsByName("password")(0).Focus()
SendKeys.Send(TextBox2.Text)
Application.DoEvents()

With WebBrowser1.Document.GetElementsByTagName("button").Cast(Of HtmlElement).Where(Function(x) x.GetAttribute("type").Equals("submit"))(0)
   .Focus()
   .InvokeMember("click")
End With