Vom WebBrowser zu geckoFx gewechselt

  • VB.NET

    Vom WebBrowser zu geckoFx gewechselt

    Hallo,

    Bin neu hier und habe noch nicht so viel programmier Erfahrung, jedenfalls habe ich vom WebBrowser zu GeckoFX gewechselt und nun funktionieren folgende Code schnipsel nicht mehr, hat jemand eine Ahnung wie ich die an Geckofx anpassen könnte?
    Bin ziemlich am Verzweifeln, bei google bin ich auch nicht fündig geworden.

    VB.NET-Quellcode

    1. Schnipsel 1
    2. While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
    3. Application.DoEvents()
    4. End While
    5. Schnipsel 2
    6. Dim allelements As HtmlElementCollection = WebBrowser1.Document.All
    7. For Each webpageelement As HtmlElement In allelements
    8. If webpageelement.GetAttribute("name") = "personaldataPanel:first-name:textfield" Then
    9. webpageelement.SetAttribute("value", vnameTB.Text)
    10. Schnipsel 3
    11. Dim PageElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("img")
    12. For Each CurElement As HtmlElement In PageElements
    13. TextBox1.Text = TextBox1.Text & CurElement.GetAttribute("src") & Environment.NewLine
    14. PictureBox1.ImageLocation = TextBox1.Text & CurElement.GetAttribute("src") & Environment.NewLine
    15. Next