Using WebRequest and captcha's - Stuck on this Recaptcha - "Your Answer was correct."

[SIZE=2][SIZE=2][COLOR=#ffffff]    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        '1 - Get to website
        '2 - GET to recaptcha :[/COLOR]
[COLOR=#ffffff]
        Dim webRequest1 As HttpWebRequest = DirectCast(WebRequest.Create("[/COLOR][URL="http://www.google.com/recaptcha/api/challenge?k=XXXXXXXX"][COLOR=#ffffff]http://www.google.com/recaptcha/api/challenge?k=XXXXXXXX[/COLOR][/URL][COLOR=#ffffff]"), HttpWebRequest)[/COLOR]
[COLOR=#ffffff]        '3 - 2 returns some text and u have to use .Substring to get the challenge name from it .
        'My code:[/COLOR]
[COLOR=#ffffff]        Dim responseReader As New StreamReader(response.GetResponseStream())
        Dim sResponseHTML As String = responseReader.ReadToEnd()
        Dim a As Integer = sResponseHTML.IndexOf("challenge : '") + 13
        Dim x As String = sResponseHTML.Substring(a)
        Dim b As Integer = x.IndexOf("'")
        Dim chalname As String = x.Substring(0, b)[/COLOR]
[COLOR=#ffffff]        ' now u got the challenge name[/COLOR]
[COLOR=#ffffff]        chalname = chalname.Replace(Environment.NewLine, "")[/COLOR]
[COLOR=#ffffff]        Dim cpadres As String = "http: //www .google.com/recaptcha/api/image?c=" & chalname[/COLOR]
[COLOR=#ffffff]        ' cpadres is url when u can see captcha img 
        'U have to submit the cpadres to captchatrader,decaptcher etc and u will get solved captcha[/COLOR]
[COLOR=#ffffff]
        'postData = "nickLogin=" & login & " &passLogin=" & psswd & "&recaptcha_challenge_field=" & cpchallenge & "&recaptcha_response_field=" & cpsoled.Replace(" ", "+") & "&x=64&y=9"[/COLOR]
[COLOR=#ffffff]    End Sub[/COLOR]
[/SIZE][/SIZE]

        Dim request As HttpWebRequest = HttpWebRequest.Create(WebsiteURL.Text)

        Dim response As HttpWebResponse
        response = CType(request.GetResponse, HttpWebResponse)
        Dim webstream As Stream = response.GetResponseStream
        Dim streamreader As New StreamReader(webstream, Encoding.UTF8)

        Dim html As String = streamreader.ReadToEnd

        'Now we have the source of the page lets parse and get the challenge url

        Dim web As IHTMLDocument2 = New HTMLDocumentClass()
        web.write(html)
        web.close()

        Dim allElements As IHTMLElementCollection = web.body.all
        Dim allScript As IHTMLElementCollection = allElements.tags("script")
        Dim element As IHTMLElement

        Dim challengeUrl As String = ""

        Dim tagName As String = ""
        For Each element In allScript
            tagName = element.getAttribute("src")
            If (Not tagName = Nothing) Then
                If (tagName.Contains("http://api.recaptcha.net/")) Then
                    challengeUrl = tagName
                    Exit For
                End If
            End If
        Next

        'Now we have the challenge url in challengeUrl variable, so lets "GET" it

        Dim request1 As HttpWebRequest = HttpWebRequest.Create(challengeUrl)

        Dim response1 As HttpWebResponse
        response1 = CType(request1.GetResponse, HttpWebResponse)
        Dim webstream1 As Stream = response1.GetResponseStream
        Dim streamreader1 As New StreamReader(webstream1, Encoding.UTF8)

        Dim temp As String = streamreader1.ReadToEnd

        'Now parse the index or whatever of that image, it is the thing that we are looking after

        Dim startPos As Integer = temp.IndexOf("challenge : '")
        startPos += 13
        temp = temp.Substring(startPos)
        Dim endPos As Integer = temp.IndexOf("'")

        temp = (temp.Substring(0, endPos))

        'Now the temp variabloe contains the key for the image.. You can download the image from

        PictureBox1.Load("http://www.google.com/recaptcha/api/image?c=" & temp)
    End Sub