可以参考systems.io.compression吗？

Question

我正在尝试解压缩一个我收到的gzip压缩的that响应。我试着设置，希望没有接收到压缩的JSON字符串，但是它没有工作，而且我确信服务器强制对响应进行gzip压缩。

我使用它作为EXCEL电子表格的一部分。

xmlhttprequest对象没有本机解压缩。但是，在.NET类的system.io.compression中有一些GZipstream库。

我无法添加这个类存在的system.dll的引用。

有可能吗？有人能指导我如何完成这件事吗？

事先非常感谢

Answer 1

我不确定这对您的情况是否有帮助，但是这里有一些VBA到解压缩文件。

Public Sub UnzipFiles(FName As Variant, FileNameFolder As Variant, sFilter As String)
  Dim fso As Object
  Dim oApp As Object
  Dim DefPath As String
  Dim strDate As String
  Dim fileNameInZip As Variant

  Set oApp = CreateObject("Shell.Application")

  For Each fileNameInZip In oApp.Namespace(FName).Items
    If LCase(fileNameInZip) Like LCase(sFilter) Then
      If Dir(FileNameFolder & "\" & oApp.Namespace(FName).Items.Item(CStr(fileNameInZip))) = "" Then
        oApp.Namespace((FileNameFolder)).CopyHere oApp.Namespace(FName).Items.Item(CStr(fileNameInZip))
      End If
    End If
  Next
End Sub