Kód: Vybrať všetko
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">Kód: Vybrať všetko
POST https://ssl.rapidshare.com/cgi-bin/premiumzone.cgi --> 200 OK
Cache-Control: no-cache
Connection: close
Date: Sat, 27 Jan 2007 22:48:17 GMTKód: Vybrať všetko
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">Kód: Vybrať všetko
function HttpPostURL2(const URL, URLData: string; const Data: TStream; const Headers: TStringList; const Cookies: TStringList): Boolean;
var
HTTP: THTTPSend;
begin
HTTP := THTTPSend.Create;
try
WriteStrToStream(HTTP.Document, URLData);
HTTP.MimeType := 'application/x-www-form-urlencoded';
Result := HTTP.HTTPMethod('POST', URL);
if Result then
begin
Data.CopyFrom(HTTP.Document, 0);
Headers.Assign(HTTP.Headers);
Cookies.Assign(HTTP.Cookies);
end;
finally
HTTP.Free;
end;
end;Kód: Vybrať všetko
if Assigned(Headers) then Headers.Assign(HTTP.Headers);
no hej, ušetríš čas sťahovania pár kíl navyše4JOKE napísal:a ak porovnam teraz vypisovanie zdrojaku tymto komponentom s tym ze by som to prerobil len ze by to vracalo ten header, tak oplati sa mi s tym zabijat cas a hladat sposob ako to spravit len cez header ale ta rychlost nebude zasadne vyssia??
ale pri rýchlostiach dnešných pripojení to nepocítiš. Tak ako chceš. Závisí od stránky ktoré overuješ a tiež od programu (koľkokrát chceš danú procedúru volať)
Kód: Vybrať všetko
POST http://www.abclinuxu.com
Referer: http://www.mozilla.sk
User-Agent: lwp-request/2.06
Content-Length: 13
Content-Type: application/x-www-form-urlencoded
test=retazec
Kód: Vybrať všetko
function THTTPSend.HTTPMethod(const Method, URL: string): Boolean;Kód: Vybrať všetko
FHeaders.Insert(0, 'Cookie: ' + s);jj, to som si uz upravil ze ta HttpPostUrl mi vyhodi len st:TstringList ktora obsahuje cookies a ked je prazdna tak sa nepodarilo prihlasit...chrono napísal:Namiesto TMemo sa dá použiť TStrings (TStringList) (veď Memo.Lines je tuším práve TStringList).
na plnohodnotne POSTovanie som pouzival Indy komponent IdHttp ale teraz uz pracujem iba s kvalitkou a to s ICS komponentami (su zadarmo a velmi kvalitne), konkretne HttpCli, len este nemam zistine ci dokaze pracovat s SSL (zatial som to nepotreboval)audiotrack napísal:2 chrono: nemáš nejaký zaujímavý link ako presne má vyzerať hlavička POST-u (neviem ako tam zakomponovať referera)[/size]
indy komponenty sa mi zdali komplikovanejsie ako synapse, bo ku synapse som mal aj dema a na stranke bolo celkom dobre popisane co co robi...ferks napísal:na plnohodnotne POSTovanie som pouzival Indy komponent IdHttp ale teraz uz pracujem iba s kvalitkou a to s ICS komponentami (su zadarmo a velmi kvalitne), konkretne HttpCli, len este nemam zistine ci dokaze pracovat s SSL (zatial som to nepotreboval)
to mňa nezaujíma čo ty používaš na postovanie, ja to potrebujem aj naťahovať do webbrowseru a zobrazovať.ferks napísal:na plnohodnotne POSTovanie som pouzival Indy komponent IdHttp ale teraz uz pracujem iba s kvalitkou a to s ICS komponentami (su zadarmo a velmi kvalitne), konkretne HttpCli, len este nemam zistine ci dokaze pracovat s SSL (zatial som to nepotreboval)
šak som ti písal že na odoslanie referera. Ono ten webbrowser funguje tak, že keď mu dáš načítať stránku, tak starý obsah zruší a natiahne nový. Aby som docielil prechod z jednej lokality na druhú v rámci webbrowsera, musím okrem url zabezpečiť aj záznam o predchádzajúcej stránke v podobe referera. Ono by som nemusel, keby to daný web nevyžadujechrono napísal:Môžem vedieť, na čo potrebuješ to POST?
