在 Classic ASP 中包含 VBscript 类答案

【问题标题】：Include VBscript class inside Classic ASP在 Classic ASP 中包含 VBscript 类
【发布时间】：2026-02-16 23:20:03
【问题描述】：

我正在尝试在经典的 asp 脚本中实现 LZW 压缩。这是 LZW VBscript： http://www.koders.com/asp/fid8C7ADB343C2D52BEC62BEFFCD05C2C3207C263AD.aspx?s=lzw#L3

但是，我遇到了问题（包括经典 asp 中的 vb）：

Microsoft VBScript 编译错误“800a03ee” 预期的 '）' /_test/lzw_class.asp，第 109 行 Public Sub Compress_LZW_Static_Hash(aFileArray() As Byte) --------------------------------------------------^

有没有一种简单的方法可以将 vbscript 包含在 asp 中？

【问题讨论】：

顺便说一句：如果你有一个经典的 asp LZW 实现函数来压缩字符串，那将是一个很好的奖励:-)

标签： asp-classic vbscript

【解决方案1】：

要“VBScriptify”代码有人已经通过它并通过注释掉它们的类型名称来使所有变量成为无类型变体，但他们在第 109 行（以及许多其他地方也是如此）忘记了这样做；

编辑；该类使用 CopyMem API，因此您无法将其移植到 VBS。您将需要找到一个现有组件，该组件使用 VB6 将该类压缩或编译为 COM dll。

【讨论】：

【解决方案2】：

对于使用 ASP 的文件的 ZIP 压缩，我使用 DLL。然后每当我需要使用它时，我只需调用它。过去我们必须编写自己的 DLL，但今天有时会失败。从那以后，我发现了一个名为 Xzip 的免费资源，它具有出色的性能，使我能够创建文件、保存文件、压缩文件并通过电子邮件发送或提供压缩下载...使用 Classic ASP 即时进行。

对于 ZIP 部分，请参阅 http://www.xstandard.com/en/documentation/xzip/

【讨论】：