Inno Setup - HTTP request - Get www/web content

问题:

Could some one tell me how can I get www content in Pascal Code in Inno Setup Script?

Regards,
Tomasz

回答1:

Use WinHttpRequest:

var
  WinHttpReq: Variant;
begin
  WinHttpReq := CreateOleObject('WinHttp.WinHttpRequest.5.1');
  WinHttpReq.Open('GET', 'https://www.example.com/', False);
  WinHttpReq.Send('');
  if WinHttpReq.Status <> 200 then
  begin
    Log('HTTP Error: ' + IntToStr(WinHttpReq.Status) + ' ' + WinHttpReq.StatusText);
  end
    else
  begin
    Log('HTTP Response: ' + WinHttpReq.ResponseText);
  end;
end;