Форум: "Сети";
Текущий архив: 2005.02.13;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.034 c