在for循环中填充VBScript数组

时间:2011-09-06 14:18:30

标签: loops vbscript

我正在尝试在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,但这似乎应该工作。为什么我的循环没有做任何事情?

1 个答案:

答案 0 :(得分:2)

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

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中

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