在for循环中填充VBScript数组

Question

我正在尝试在VBScript中创建并填充二维数组，该数组驻留在ASP页面中。我有以下代码：

Dim array(11, 6)

For record = 0 To 6
    array(6, record) = 8
    array(7, record) = "test"
Next

array(6, 3) = 8
array(7, 3) = "test"

for循环不起作用。什么都没有填写。如果我明确地这样做，就像循环后的代码， 可以正常工作。

我之前几乎没有使用过VBScript，但这似乎应该工作。为什么我的循环没有做任何事情？

Answer 1

您的“不起作用”不起作用。你必须准确描述你的期望和发生的事情。否则 -

Dim a(11,6)
For i = 0 To 6
    a(6,i) = i
    a(7,i) = "test"
Next
WScript.Echo a(6,0),a(7,0)
WScript.Echo a(6,6),a(7,6)

0 test
6 test

是否有一个邪恶的“On Error Resume Next”有效？

写下OERN：

你可以在关键/新代码之前插入一个“On Error GoTo 0”，然后立即关闭，并在其后立即关闭“On Error Resume Next”。

或者：将新代码复制到cscript.exe

使用的干净/空.vbs中

或者：完全发布代码的相关部分。