Da es hier immernoch keine Antwort gibt, so kommst du an den Quelltext:
Code:
Url = "Deine URL"
Dim Request As HttpWebRequest = CType(WebRequest.Create(Split(Url, "?")(0)), HttpWebRequest)
Request.CookieContainer() = DeinCookieContainer '(Falls benötigt)
Request.Method = "POST"
Request.Timeout = 12000
Request.ContentType = "application/x-www-form-urlencoded"
Dim Post As String = Split(Url, "?")(1)
Dim byteArray() As Byte = Encoding.UTF8.GetBytes(Post)
Request.ContentLength = byteArray.Length
Dim DataStream As Stream = Request.GetRequestStream()
DataStream.Write(byteArray, 0, byteArray.Length)
DataStream.Close()
Dim Response As HttpWebResponse = Request.GetResponse()
DataStream = Response.GetResponseStream()
Dim reader As New StreamReader(DataStream)
Dim ServerResponse As String = reader.ReadToEnd()
reader.Close()
DataStream.Close()
Response.Close()
Return ServerResponse
Diese Funktion schickt eine Request an die angegebene URL und erhält eine Response (der Quelltext) zurück.
An die URL kommst du dann mit der Split() Anweisung (die musst du auf den Quelltext zuschneiden)
Danach - wenn du also die URL hast - kannst du diese mit Select Case oder mehreren If Anweisungen auswerten (in deinem Fall mit 20 Captchas wäre Select case wohl sinnvoller).
Ich hoffe mal ich hab dich richtig verstanden^^
MfG