VB6 想拿别人网页里 JS 动态生成的何获内容，最直接的取带办法是扔个 WebBrowser 控件上去。这玩意儿本质就是密码 IE 的内核，加载完页面后能通过 DOM 拿到渲染后的网页 HTML。但问题来了——如果页面带密码，何获你得先处理登录。取带登录本身不难，密码难的网页是登录后那些 JS 异步刷出来的数据，你直接读 Document 经常读不到，何获因为时机不对。取带

我试过最笨的密码方法：WebBrowser1.Navigate 一个 URL，然后在 DocumentComplete 事件里 Sleep 个几秒再读 innerHTML。网页结果十次有八次读到的何获还是空壳。后来发现 JS 里的取带 setTimeout 和 XHR 根本不鸟你的 Sleep。得换个思路，密码用循环去检测某个目标元素的 innerText 是否出现。比如页面里有个 id 叫 "secretData" 的 div，你就写个 Do While 循环，每 200 毫秒查一次，直到它不为空或者超时。代码大概长这样：

Do While WebBrowser1.Document.getElementById("secretData").innerText = "" And Timer < startTime + 30 DoEvents Sleep 200 Loop

注意 Sleep 得用 API 声明，VB6 自带的没这函数。DoEvents 不能省，不然界面卡死，WebBrowser 内部的 JS 线程也会跟着停摆。这个坑我踩过，当时调了半小时才发现是没加 DoEvents。

密码怎么传？两种常见情况。一种是 HTTP Basic Auth，弹出一个浏览器原生对话框。这个好办，在 Navigate 之前设置 WebBrowser1.Document 没用，得用 URL 里带用户名密码的格式：http://user:pass@site.com/page。IE 内核支持这个，但有些服务器会拒绝，那就得用 WinINet API 手动发请求拿 Cookie，再塞给 WebBrowser。另一种是表单登录，页面上有 input type="password"。这种更简单，DocumentComplete 之后直接给用户名密码框赋值，然后触发 form 的 submit 方法。注意要等第一个 DocumentComplete 触发完再操作，否则元素还没生成。

有时候 JS 里的内容不是写在 HTML 里，而是藏在 script 标签的变量里。比如 var secret = "abc123";。这时候读 innerHTML 没用，得用正则去匹配整个 HTML 文本。VB6 里用 RegExp 对象，Pattern 写成 var\s+secret\s*=\s*"([^"]+)"，然后 Execute 拿 SubMatches(0)。这招对付那些把数据硬编码在 JS 里的页面特别管用，比等 DOM 渲染快得多。

还有一个坑：WebBrowser 默认用 IE7 兼容模式，很多现代 JS 语法直接报错。你需要在 HTML 头部加 <meta http-equiv="X-UA-Compatible" content="IE=edge">，但这是页面自己控制的，你改不了。解决办法是改注册表，把 EXE 名字加到 FEATURE_BROWSER_EMULATION 里，值设成 11001（IE11 边缘模式）。这步不做，很多页面加载出来是白板，JS 全挂。

最后说个取巧的。如果目标页面不复杂，别用 WebBrowser，直接 WinHttpRequest 发 GET，拿到原始 HTML 后自己解析。密码用 Cookie 维持，登录请求返回的 Set-Cookie 存下来，后续请求带上。JS 动态内容？如果它是通过 XHR 拉 JSON，你直接模拟那个 XHR 请求就行，连 HTML 都不用解析。我做过一个项目，页面加载后 JS 去请求 /api/data?token=xxx，我直接 WinHttp 拿那个接口，返回的 JSON 用 Split 或者正则切吧切吧就完事了。比折腾 WebBrowser 快十倍，还不用管 IE 兼容性。

VB6 搞网页抓取就是个体力活，没有现成轮子，全是补丁摞补丁。但摸清套路后，大部分带密码的页面都能啃下来。关键是别跟 DOM 死磕，该抓包抓包，该正则正则，怎么快怎么来。

(责任编辑：百科)