如何在VB中加载网页并自动登录?

时间:2016-01-15 01:05:04

标签: vb.net email

我有一个应用程序,它将使用Web浏览器控件打开一个网页并自动登录用户信息,例如gmail。我计划用户可以输入3个选项:Gmail,Twitter和Facebook。所有输入的用户名和密码都会输入,然后点击上面的其中一个选项,他们的帐户将自动登录。我遇到的问题是,当我的应用程序加载时,gmail也是如此,所以如果用户想要登录对于Facebook来说,看到Gmail自动加载到表单中会很尴尬,对吧?所以我从私人表单中获取了'WebBrowser1.Navigate(" https://accounts.google.com/ServiceLogin?service=mail&passive=true&rm=false&continue=https://mail.google.com/mail/&ss=1&scc=1&ltmpl=default&ltmplcache=2&emr=1&osid=1"),并希望将其添加到名为gmail的按钮中。所以按钮看起来像这样:

 Private Sub btnGmail_Click(sender As Object, e As EventArgs) Handles btnGmail.Click
    WebBrowser1.Navigate("https://accounts.google.com/ServiceLogin?service=mail&passive=true&rm=false&continue=https://mail.google.com/mail/&ss=1&scc=1&ltmpl=default&ltmplcache=2&emr=1&osid=1")

    WebBrowser1.Document.GetElementById("Email").SetAttribute("value", txtEmail.Text)
    WebBrowser1.Document.GetElementById("Passwd").SetAttribute("value", txtPasswd.Text)
    WebBrowser1.Document.GetElementById("signIn").InvokeMember("click")
End Sub

然而我收到错误:

  

未处理的类型' System.NullReferenceException'   一些谷歌搜索表明,这意味着我的表格中有一些空格?但是一切都已填满,所以我不明白为什么?在我的代码中,它强调了" txtEmail.Text"部分在第3行,但我填写了吗?

所以现在我无法让用户点击按钮" GMAIL"所以它将加载gmail并继续输入他们在电子邮件和passwd文本框中键入的信息。

0 个答案:

没有答案