EmbeddedWB 사용시 Referer 바꾸기

procedure TForm1.Button1Click(Sender: TObject);
const
  URL     = 'http://www.가고싶은곳.com';
  REFERER = 'http://www.Referer로하고싶은곳.com';

 

var
  Flags:           OLEVariant;
  TargetFrameName: OLEVariant;
  PostData:        OLEVariant;
  Headers:         OLEVariant;

begin
  Flags:='1';
  TargetFrameName:='';
  PostData:='';
  // Header 에 Referer 를 임의로 지정함
  Headers:='Referer: '+REFERER+#10#13;

 

  EmbeddedWB1.Navigate(URL, Flags, TargetFrameName, PostData, Headers);
end;

 

 

 

결국 EmbeddedWB 도 IWebBrowser 를 이용할 뿐이다.

Navigate Method 가 여러 overload 버전이 있는 것은 원본을 줄여쓰기 위해 나온 것 같다.

보통은 URL 만 쓰고 그냥 쭉 가고 싶을 때가 많으니까.

 

아래는 IWebBrowser 의 Navigate Method 의 MSDN 링크.

http://msdn.microsoft.com/en-us/library/aa752133(VS.85).aspx