웹브라우저를 구성하고 HTML 소스를 읽어오려고 합니다.
근데 이 사이트의 소스는 읽어올수가 없네요..
어떻게 한 걸까요?
http://www.cme.com/cgi-bin/gflash.cgi
이 주소를 브라우저에서 읽으면
procedure TForm1.Timer1Timer(Sender: TObject);
var
HTMLDoc : Variant;
HTMLStr : String;
begin
webbrowser1.navigate('http://www.cme.com/cgi-bin/gflash.cgi');
--> 여기까지만 하면 잘 나와여...
--> 근데 아래 문장으로 읽어오려고 하면 ERROR !!
Memo1.Clear;
HTMLDoc := WebBrowser1.Document;
if VarIsEmpty(HTMLDoc) then exit;
HTMLStr := HTMLDoc.Body.InnerHTML;
Memo1.text := HTMLStr;
timer1.interval := 5000;
end;
end;
어제부터 이거 가지고 헤메고 있습니다.
고수님들의 조언을 부탁드립니다.
> 웹브라우저를 구성하고 HTML 소스를 읽어오려고 합니다.
>
> 근데 이 사이트의 소스는 읽어올수가 없네요..
>
> 어떻게 한 걸까요?
>
> http://www.cme.com/cgi-bin/gflash.cgi
>
> 이 주소를 브라우저에서 읽으면
>
> procedure TForm1.Timer1Timer(Sender: TObject);
> var
> HTMLDoc : Variant;
> HTMLStr : String;
> begin
>
> webbrowser1.navigate('http://www.cme.com/cgi-bin/gflash.cgi');
>
> --> 여기까지만 하면 잘 나와여...
>
> --> 근데 아래 문장으로 읽어오려고 하면 ERROR !!
>
> Memo1.Clear;
> HTMLDoc := WebBrowser1.Document;
>
> if VarIsEmpty(HTMLDoc) then exit;
> HTMLStr := HTMLDoc.Body.InnerHTML;
> Memo1.text := HTMLStr;
>
> timer1.interval := 5000;
> end;
>
> end;
>
> 어제부터 이거 가지고 헤메고 있습니다.
>
> 고수님들의 조언을 부탁드립니다.
>
>
FastNet중에서 NMHTTP 란 컴포넌트가 있어요..
이걸 배치하시고...
NMHTTP.Get('http://원하는 url');
하시면
NMHTTP.Body 에 스트링으로 소스가 들어갑니다...