Dobrogo vremeni sutok, mastera.
Vopros sledujushij (tak nazivaemij referrer spoofing, no juzaetsja v blagih namerenijah):
Procedura:
var
Headers: OLEVariant;
Url, Ref: string;
IE: OLEVariant;
begin
try
IE := CreateOLEObject('InternetExplorer.Application');
except
Exit;
end;
Url := 'http://www.gurudelphi.googlepages.com/index.html';
Ref := 'http://www.somehost.com';
Headers := 'Referer: ' + Ref + #13#10;
IE.Navigate(Url, EmptyParam, EmptyParam, EmptyParam, Headers);
end;
Vse vorde bi kak vse "umnie" ljudi pishut(MSDN, google...). Mozhet na 6 Explorere eto i pahalo, no eto ne pashet na WinXP SP2 s IE7!
TClientSocket i TidHTTP NE PREDLAGATJ - mne nuzhno imenno cherez IE otkritj i chtobi JavaScript na etoj starnice vipolnjal vse neobhodimie izmenenija. Samomu obrabativatj vse FRAME i IFRAME i refereri dlja nih eto boljno na golovu...
Estj varianti?