html agility pack ~ how can I get all inputs of a form~ error code given

simpleonline

Active member
Joined
Sep 13, 2011
Messages
33
Programming Experience
Beginner
VB.NET:
Imports System.Net
Imports System.IO
Imports System.Text


Imports HtmlAgilityPack

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        HtmlNode.ElementsFlags.Remove("form")
        Dim doc As New HtmlDocument()
        doc.LoadHtml("http://mywebsiteishere/")
        Dim secondForm As HtmlNode = doc.GetElementbyId("form2")
        For Each node As HtmlNode In secondForm.Elements("input")
            Dim valueAttribute As HtmlAttribute = node.Attributes("value")
            If valueAttribute IsNot Nothing Then
                Console.WriteLine(valueAttribute.Value)
            End If
        Next





    End Sub
End Class


And here is my error code.

examplek.jpg


What I am trying to do is to navigate to a website and download all the inputs of the form on that page. Doesn't matter what website I use I can't get beyond this error code.

Any ideas?

Thanks
 
For Each node As HtmlNode In secondForm.Elements("input")
Either secondForm refers to Nothing, or the Elements member returns Nothing, so you have to look there for the reason.
 
Back
Top