最初,我尝试获取网址的来源,然后提取我正在寻找网址的值,如下所示
Dim URL = http://www.google.com
Dim oHTTP : Set oHTTP = CreateObject("MSXML2.ServerXMLHTTP.6.0")
oHTTP.setproxy 2,"<Proxy server:Port>"
oHTTP.Open "GET", URL, False
oHTTP.Send
因为我在URL中查找的值是特定于代理的。并且值根据代理服务器名称而有所不同,代理服务器名称明确地提到了上面的代码片段。 我意识到,自使用PAC文件以来,明确提供代理服务器名称并不是正确的方法。仅提供代理名称会列出该名称下的服务器。
所以我想从浏览器打开一个URL,这样就可以记录PAC的详细信息,然后从那里抽出必要的值。
如下所示,从默认浏览器中打开一个URL,我想知道有没有办法从浏览器中提取值。
CreateObject("WScript.Shell").Run("http://www.google.com")