经典 ASP 相当于 PHP 的 pack()

Classic ASP equivalent of PHP's pack()

经典 ASP 中 PHP 的 pack() 函数的等效函数是什么?

Classic ASP 中没有开箱即用的等效功能。在 Classic ASP 中实现此功能时,您基本上有几个选择,您可以;

  1. 使用模拟功能的 COM 组件,包括使用公开给 COM 的 .NET 程序集。
  2. 尝试自己编写代码,但尤其是使用 VBScript 时,您可能会在使用字节数组等时遇到问题。
  3. 用 C++ 或 C# 等主流语言编写您自己的 COM 组件(还有其他的我只是没有列出它们,并且不确定是否支持启用 COM 的 DLL) .

我有另一种方法可以实现:

Dim key2, hexarr, binstr
key2 = "12 34 56 78 90 AB CD EF"
hexarr = Split(key2)
ReDim binarr(UBound(hexarr))

For i = 0 To UBound(hexarr)
  binarr(i) = Chr(CInt("&h" & hexarr(i)))
Next

binstr = Join(binarr, "")

其中 key2 是每 2 个字符由 space 填充的原始秘密。

结果与 PHP 的 pack() 相同,但经典 ASP 中的其他函数无法正确读取 binstr