vb.net - ログインの自動化

Question

ログインの自動化にはかなりの数のフォームがありますが、自分に合ったフォームが見つからないようです。私は MVS 2010 を使用していますが、重複しているとしたら、これは Web ブラウザーにアクセスしようとしているコンソール アプリケーションです。これが私の関連する2つのサブです。

' Navigates to the given URL if it is valid. 
Private Sub Navigate(ByVal address As String)
    If String.IsNullOrEmpty(address) Then Return

    If address.Equals("about:blank") Then Return

    If Not address.StartsWith("http://") And Not address.StartsWith("https://") Then
        address = "http://" & address
    End If

    Try
        webBrowser1.Navigate(New Uri(address))
    Catch ex As System.UriFormatException
        Return
    End Try
End Sub


Private Sub WebBrowser1_DocumentCompleted() Handles webBrowser1.DocumentCompleted

    While webBrowser1.IsBusy
        System.Threading.Thread.Sleep(30)
    End While

    If Not webBrowser1.IsBusy Then
        For Each ele As HtmlElement In webBrowser1.Document.All
            If ele.GetAttribute("ctl00$ContentPlaceHolder1$LoginButton").ToLower = "Login" Then
                ele.InvokeMember("click")
            End If
        Next
    End If
End Sub

ご覧のとおり、ドキュメントの完了には至りませんが、新しい Web ブラウザーを起動することはありません。コードを次のように変更すると、新しい Web ブラウザーが開きますが、ボタンはクリックされません。

   webBrowser1.Navigate(New Uri(address), true)

助言がありますか？