Текущий архив: 2005.02.13;
Скачать: CL | DM;
Вниз
Delphi&IE Найти похожие ветки
← →
dms_main © (2004-11-29 01:06) [0]Мастера подскажите плиз!
Как в открытый IE вставить свои cookies и открыть другую страницу?
← →
dms_main © (2004-11-29 09:46) [1]Если кому интересно - вот решение:
procedure TMyThread.OpenInternetExplorer( fURL,sURL : string );
const
csOLEObjName = "InternetExplorer.Application";
var
IE: Variant;
WinHanlde: HWnd;
cookies:TStringList;
i:integer;
begin
cookies:=TStringList.Create;
cookies.LoadFromFile("cookies.txt");
CoInitialize(NIL);
IE := CreateOleObject(csOLEObjName);
IE.Visible := true;
IE.Navigate(fUrl);
sleep(7000);
for i:=0 to cookies.Count-1 do
begin
ie.document.cookie:=cookies.Strings[i];
end;
DeleteFile("cookies.txt");
IE.Navigate(sURL);
end;
Буду очень признателен если кто-нибудь подскажет как отловить - загрузилась ли страница в IE?
← →
seeker (2004-11-29 10:44) [2]while WB.ReadyState<>4 do Application.ProcessMessages;
← →
dms_main © (2004-11-29 10:56) [3]Спасибо большое человеческое......:-)
Страницы: 1 вся ветка
Текущий архив: 2005.02.13;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.043 c
