html - 如何在 Delphi 2007 中将文件下载到受密码保护的位置

Question

我需要从 Web 获取 HTML 页面的内容，但相应资源的内容只有在用户登录网站后才可用。

更具体地说，我需要下载在 Youtube 上被标记为不合适的视频文件的 HTML 页面。我确实有登录凭据，但我不确定如何继续登录。

我目前正在从 Synapse 使用 HTTPSend 下载不受密码保护的 HTML 页面，并且我还拥有我在以前的项目中使用的 Clever Internet Suite 7 的许可副本。

我正在使用的代码看起来像这样(这是严格的信息，我可以在必要时更改方法):

function GetHTMLFile(s: string): string;
var
  sHTTPSource:TStringList;
  HTTP: THTTPSend;
begin
  try
    sHTTPSource := TStringList.Create;
    if HttpGetText(s, sHTTPSource) then
    begin
      result := sHTTPSource.Text;
    end;
  finally
    sHTTPSource.Free;
  end;
end;

我不指望你为我做所有的工作，但我真的很感激一个正确方向的提示。

Answer 1

THTTPSend 有一个属性 .Cookies (TStringList)，它采用名称-值对(每个都是一个 cookie)。如果您使用相同的 THTTPSend 实例通过登录过程发布，则从 YouTube 发送的 cookie 将被捕获，并将保留在 future 使用相同 THTTPSend 实例的请求中。您可以每次都执行此操作(获取新的 cookie)，也可以在向 protected 页面发出请求之前将 cookie 信息硬(或软)编码到 THTTPSend 中。

您也可以只登录一次并将 .cookies TStringList 保存在某处，每次将其分配给您创建的任何新 THTTPSend 以发出新请求。