vb6 - 使用 webbrowser 控件保存网页

Question

我正在使用 VB6 和 webbrowser 控件导航到网页。我想在没有任何人工干预的情况下定期保存我访问的页面。

我知道如何使用 DOM 解析 HTML。但也需要保存页面而不显示任何对话框。

这可能吗？将不胜感激一些帮助。

谢谢。陶菲克。

Answer 1

这篇Microsoft 知识库文章(Q244757) 说无法使用 Web 浏览器控件执行此操作，但提供了使用 UrlMon.dll 的替代解决方案，我将其放在下面。

Private Declare Function URLDownloadToFile Lib "urlmon" Alias _ 
  "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _ 
  ByVal szFileName As String, ByVal dwReserved As Long, _ 
  ByVal lpfnCB As Long) As Long 

returnValue = URLDownloadToFile(0, "http://www.microsoft.com/ms.htm", _
  "c:\ms.htm", 0, 0) 

显然，它不会下载像图像这样的嵌入内容。UrlMon.dll需要Internet Explorer 3，因此可以在任何现代 PC 上使用。

对于加分，这里是如何异步下载多个文件，在 100% 原生 VB6 中，根本不需要 API 调用！