안녕하세요...
제목 그대로 webBrowser를 통해서 소스를 긁어 오거든요..
mmOri.Lines.Text:=WebBrowser1.OleObject.Document.DocumentElement.OuterHTML;
이걸 통해서 긁어 오면 아주 잘 긁어 온다는거에요...
근데 문제는 배너 광고 들어간 그러니깐...자바스크립트를 통해서 배너 광고 하는 부분에서 밑에 OBJECT 소스가 붙어 있네요.....
그래서 긁어 와서 뿌려보면 광고가 두개가 떠여..ㅡㅡ;;;
직접 사이트 접속할때는 하나거든요..그래서 유심히 비교해보니깐..
광고에 자바스크립트 쓴 바로 밑에....
<OBJECT> ......... </OBJECT>
요놈이 붙어있드라구염...
따로 실행해보니깐...자바스크립트나 <OBJECT>나 둘다 같은 광고 거든요..
WebBrowser1.OleObject.Document.DocumentElement.OuterHTML; 요걸 사용하면 얼핏본건데.....소스를 일단 파싱한다고 하드라구염.....
지가 원하는건 있는 그대로 아무 변화 없이 그러니깐....웹페이지에서 소스보기 눌른거랑같은 소스가 필요하거든요...^^
찾아도 못찾겠어서 이렇게 질문올립니다...^^
어수선하게 말했는데..그래두....
고수님들의 답변부탁합니다....^^
항상 전코하시구염..
>지상현 님께서 갈켜주신건데요....
>procedure TMainForm.RevealSource(const Document : IHTMLDocument2; Buf : TStream);
>begin
> (Document as IPersistStreamInit).Save(TStreamAdapter.Create(Buf), True)
>end;
IHTMLDocument2 요놈을 쓸라믄 uses 에 MSHTML 요걸 추가하는걸 아는데..
IPersistStreamInit 요기서 정의되지 않은거라고 에러가 나네요..^^
어케 해야하는지...
글구 긁어 온 소스를 memo컴포넌트에 뿌릴라고 하는데..ㅠㅠ 모르겠네요...어케 하는지
답변부탁드립니다..^^
장난삼아 만들었던 프로그램입니다.
소스랑 같이 압축했으니깐 함 보세요..하시고자 하는 작업에
도움이 될까 싶어서요..^^;
추가질문은 사절입니다..ㅡㅡ; 저두 이거 여기 질답 란에서 다 모은 겁니다.
즐코~~