从 URL 读取文件答案

【问题标题】：Read files from URL从 URL 读取文件
【发布时间】：2013-06-19 14:00:20
【问题描述】：

是否可以从 URL 读取 .css 和 .js 等文件？例如，我有一个位于http://main/shared/css/main.css 的文件，我想读取该文件并将其内容存储在另一个位于c:\main.txt 的文件中。我知道如何读取本地驱动器中的文件，但不确定如何读取 URL。非常感谢任何帮助。

【问题讨论】：

是的，这是可能的（当然，只要您运行 VBScript 的 PC 可以访问互联网！），我想您会在 this SO question 中找到答案
Download a file with VBS的可能重复

标签： vbscript

【解决方案1】：

您可以为此使用XMLHttpRequest：

url = "http://main/shared/css/main.css"

Set req = CreateObject("Msxml2.XMLHttp.6.0")
req.open "GET", url, False
req.send

If req.Status = 200 Then
  Set fso = CreateObject("Scripting.FileSystemObject")
  fso.OpenTextFile("C:\main.txt", 2).Write req.responseText
End If

【讨论】：

感谢您的快速回复

【解决方案2】：

是的，只要你知道有问题的文件名，你应该能够做一个简单的 XMLHttpRequest

【讨论】：

【解决方案3】：

url = "http://main/shared/css/main.css"

Set req = CreateObject("Msxml2.XMLHttp.6.0")
req.open "GET", url, False
req.send

If req.Status = 200 Then
  Set fso = CreateObject("Scripting.FileSystemObject")
  fso.OpenTextFile("C:\main.txt", 8, true, 0).Write req.responseText
End If

对 OpenTextFile 行稍作修改，以便创建文本文件如果它不存在，则在本地。

【讨论】：