a-kuma3 https://blog.hatena.ne.jp/a-kuma3/ おまえ、うまそうだな https://a-kuma3.hatenablog.com/ この質問の回答での余禄。 url = ... Set xhr = CreateObject("MSXML2.ServerXMLHTTP") xhr.Open "GET", url, False xhr.Send If xhr.Status < 400 Then WScript.Echo xhr.responseText End If 同期モードになるのは VBScript なので、しゃあない。プロクシを使うときはこう。 xhr.Open "GET", url, False xhr.setProxy 2, "proxy.foo.com:8080", "" xhr.Send 認証ありのプロクシだと… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fa-kuma3.hatenablog.com%2Fentry%2Fxhr_at_vbscript" title="WSH (VBScript) で XMLHTTPRequest - おまえ、うまそうだな" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2016-03-31 18:10:40 rich https://a-kuma3.hatenablog.com/entry/xhr_at_vbscript 1.0 100%