在VBScript中设置多维数组

时间:2012-03-29 15:59:02

标签: php asp-classic vbscript

我正在将PHP程序转换为ASP的VBScript。我很难找到一种方法来构建一个多维数组,并可以使用一些帮助。

以下是它在php版本中的设置方式:

// $_SESSION[model name][level name][menu name] => [state]
$_SESSION[$model] = array('level_name' => array('menu_name' => array()));

然后是我稍后在

上设置值的方法
$_SESSION[$model][$level_name][$menu_name] = array('menu_state' => 'UNCHECKED');

以下是我在VBScript中尝试的无法使用的内容

Session(model).Add "level_name", Array()
Session(model)("level_name").Add "menu_name", Array()
Session(model)("level_name")("menu_name").Add "menu_state", Array()

然后尝试设置值

Session(model)(level_name)(menu_name)("menu_state") = "UNCHECKED"

但我最终得到了非常有用的500服务器错误。

有什么想法吗?

1 个答案:

答案 0 :(得分:1)

你需要一本字典词典:

  Dim dicX : Set dicX = CreateObject("Scripting.Dictionary")
  Set dicX("A") = CreateObject("Scripting.Dictionary")
  Set dicX("A")("B") = CreateObject("Scripting.Dictionary")
  Set dicX("A")("B")("C") = CreateObject("Scripting.Dictionary")
  dicX("A")("B")("C")("D") = "WhatEver"
  WScript.Echo dicX("A")("B")("C")("D")