aktuell versuche ich, von wget auf die HttpClient()-Klasse umzustellen. Das klappt bisher recht gut, allerdings habe ich da ein Problem:
Code: Alles auswählen
oHttp := HttpClient():new(cSearch)
oHttp:setUserAgent(cUserAgent)
oHttp:httpRequest:setParameter("bestand", "")
oHttp:httpRequest:setParameter("ueberall", "")
oHttp:httpRequest:setParameter("showhits", "200")
cResult := oHttp:send()
nStatusCode := oHttp:getStatusCode()
Code: Alles auswählen
<br/><br/><p><b>Bitte aktivieren Sie: Cookies auf dieser Seite zulassen.</b><br /></p>
Code: Alles auswählen
aCookies := oHttp:HttpResponse:getCookies()
...
oHttp := HttpClient():new(cSearch)
oHttp:setUserAgent(cUserAgent)
oHttp:httpRequest:setParameter("bestand", "")
oHttp:httpRequest:setParameter("ueberall", "")
oHttp:httpRequest:setParameter("showhits", "200")
nLen := Len(aCookies)
FOR nI := 1 TO nLen
oHttp:httpRequest:setCookie(aCookies[nI]:name, aCookies[nI]:value)
NEXT
cResult := oHttp:send()