Member Avatar for simpleonline12 
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.

[IMG]http://img849.imageshack.us/img849/8342/examplek.jpg[/IMG]

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

  • 2 Contributors
  • 1 Reply
  • 201 Views
  • 8 Hours Discussion Span
  • Latest Post Latest Post by hericles
Member Avatar for hericles

Well,the error is saying it a nullException meaning your secondForm is empty or hasn't been loaded with anything.
This is probably because you are trying to match it with elements on the page called "form2". Are you sure they exist on the target page?

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.