Hint: Workaround to use Google without cookie acceptance: Use http:... instead of https:... But don't now, how long this work.
To test cookies, try:
Code: Select all
procedure Test();
var
Page, Address: string;
begin
Address := 'https://www.google.de/search?q=allintext%3A+Holy+Motors+%22Inhaltsangabe+%26+Details%22+site%3AFilmstarts.de/kritiken/';
SetCookies('TESTCOOKIE=ANTTest', 'www.google.de');
ShowMessage('Cookies: "' + GetCookies('www.google.de') + '"');
Page := GetPage(Address); // Bad Request
//Page := GetPage3(Address, '', 'TESTCOOKIE=ANTTest'); //<-- no cookie send, too
end;
And my Proxy shows as the first request (in later requests a cookie is send, because google set it in the first response. But this is not my added cookie. To clean the cache, close and reopen the scripting-window)
Code: Select all
GET https://www.google.de/search?q=allintext%3A+Holy+Motors+%22Inhaltsangabe+%26+Details%22+site%3AFilmstarts.de/kritiken/ HTTP/1.1
Content-Type: */*
Accept: text/html, */*
User-Agent: Mozilla/5.0 (compatible; Ant Movie Catalog)
Authorization: Basic Og==
Proxy-Authorization: Basic Og==
Host: www.google.de
Code: Select all
GET https://www.google.de/search?q=allintext%3A+Holy+Motors+%22Inhaltsangabe+%26+Details%22+site%3AFilmstarts.de/kritiken/ HTTP/1.1
Content-Type: */*
Accept: text/html, */*
User-Agent: Mozilla/5.0 (compatible; Ant Movie Catalog)
Authorization: Basic Og==
Proxy-Authorization: Basic Og==
Host: www.google.de
Cookie: TESTCOOKIE=ANTTest
Greetz,
yeti